| Re: Get rid of unwanted lines. [message #62323] |
Fri, 05 September 2008 14:45  |
xiao zhang
Messages: 81
Registered: June 2008
|
Member |
|
|
On Sep 5, 4:15 pm, mankoff <mank...@gmail.com> wrote:
> On Sep 5, 5:07 pm, xiao <littledd...@gmail.com> wrote:
>
>
>
>> On Sep 5, 2:34 pm, Jean H <jghas...@DELTHIS.ucalgary.ANDTHIS.ca>
>> wrote:
>
>>> xiao wrote:
>>>> Hi~ everyone, i have some data like this:
>
>>>> 1123.97 000 15.0600 000 271.850 000
>>>> 000 000 000 000 000
>>>> 000
>>>> 1127.98 000 15.2800 000 270.650 000
>>>> 000 000 000 000 000
>>>> 000
>>>> 1136.68 000 15.5100 000 269.300 000
>>>> 000 000 000 000 000
>>>> 000
>>>> 1139.05 000 15.7500 000 267.860 000
>>>> 000 000 000 000 000
>>>> 000
>>>> 000 000 000 000 000
>>>> 000
>>>> 000 000 000 000 000
>>>> 000
>>>> 000 000 000 000 000
>>>> 000
>>>> 1145.10 000 15.9900 000 266.410 000
>>>> 1155.74 000 16.2300 000 265.010 000
>>>> 1163.19 000 16.4500 000 263.700 000
>>>> I want to delete these zero lines and write other lines to another
>>>> file. How can I fulfill this ?
>>>> Anyone have good ideas?
>>>> Thank you
>
>>> so, do you always have 6 numbers per lines?
>
>>> do something like this:
>
>>> filname = 'originalFile.txt'
>>> nbLines = file_lines(filename) ;get the number of lines in the file
>>> data = fltarr(nbLines) ;create an array to get all the data
>
>>> openR, lun, filename, /get_lun ;open the file
>>> readf, lun, data ;get all the data
>>> close,lun ;close the file
>>> free_lun,lun
>
>>> ;Select the good lines, the ones that do NOT have only zeroes
>>> badLines = where(data[0,*] eq 0 and data[1,*] eq 0 and data[2,*] eq 0
>>> and data[3,*] eq 0 and data[4,*] eq 0 and data[5,*] eq 0, complement =
>>> goodLines)
>
>>> ;open and write the output!
>>> openW,lun, new_fileName, /get_lun
>>> printf,data[*,goodLines]
>>> close,lun
>>> free_lun,lun
>
>>> Jean
>>> PS: since you deal with float data, you might have to replace data[x,*]
>>> eq 0 by abs(data[x,0]) lt epsilon, epsilon being a number small
>>> enough to be considered as zero. Read David's Fanning website under "the
>>> sky is falling".
>
>> yes, it works, but another question arouse. When I have eight columns,
>> after i write them to another file, these numbers are not in the same
>> line. The last two numbers are in another line like this:
>
>> 964.850 0.00000 25.3800 0.00000 335.750
>> 0.00000
>> 0.237400 0.00000
>> 964.510 0.00000 25.0400 0.00000 338.800
>> 0.00000
>> 0.240100 0.00000
>> 964.140 0.00000 24.6500 0.00000 342.150
>> 0.00000
>> 0.245400 0.00000
>> 963.750 0.00000 24.2800 0.00000 345.690
>> 0.00000
>> 0.250700 0.00000
>
>> Why is that? thx
>
> See WIDTH keyword to OPEN command.
Thank you ,very much. it works. But when i read these files again in
the same program like this:
OPENr,3, 'sdata1.eol'
OPENr,4, 'wdata1.eol'
subsdata=fltarr(levlesforp,8)
subwdata=fltarr(levlesforh,6)
READF,3,subsdata
readf,4, subwdata
it always says, end of file encountered. levlesforp and levlesforh
are exactly the lines of the file generated last step. eight and six
are the column number, why is that?
|
|
|
|
comp.lang.idl-pvwave archive
Members
Search
Help
Login
Home
