protry
COMPILE_OPTIDL2
;首先读取txt文件
file=dialog_pickfile()
files1=file_search('*',count=k)
openr,lun,file,/get_lun
ifluneq-1thenreturn
tmp = ''
data=fltarr(860,1119)
fori=0,1118dobegin
tdata=fltarr(860)
readf,lun,tdata
data[*,i]=tdata
endfor
end
如果觉得《IDL读取TXT文件并写入二维数组中【转】》对你有帮助,请点赞、收藏,并留下你的观点哦!