openr,lun,file,/get_lun
nLines = file_lines(file)
data =fltarr(21,nLines)
for i=0,nLines-1 do begin
x = fltarr(21)
readf,lun,x
data[*,i] = x
endfor
free_lun, lun
txt新方法,比较自动化
openr,lun,file,/get_lun
data_all = []
line=''
WHILE NOT EOF(lun) DO BEGIN
READF, lun, line
line_str = strsplit(line,/extract)
data = float(line_str)
data_all = [[data_all], [data]]
ENDWHILE
free_lun,lun