예전 질문게시판을 참고하여 file_search로 파일을 읽어서 배열합 구하기 부분을
읽어보았습니다. 제가 하고자 하는 부분과 동일한 부분인데요.
file_search를 통해서 찾은 파일들은 각각 배열에 맞게 더해라 라고 하고 싶은데
–1—을 –2—로 바꾸었는데 각 배열로 더해지지 않고 맨 만지막에 찾은
파일의 배열을 가지고 오더라고요. 도와주시면 감사하겠습니다
—————————————————————————————-
해결완료하였습니다
openw,8,’d:/ARF/data/acc_radar_test.dat’
printf, 8, acc_radar <<<<<<<<<<<<<<<<요기를 printf,8,sum
close,8
end
으로 변경하니까 해결이 완료되었습니다
-1——————————————————————–
lon_num=901
lat_num=1051
max_time_index=24
acc_radar=fltarr(lon_num, lat_num, max_time_index)
findtxt=’d:/ARF/data/20100830/*.txt’
result1=file_search(findtxt,count=ct)
print, result1
close, /all
for ii=0, ct-1 do begin
openr,7, result1[ii]
radar_org=fltarr(lon_num, lat_num)
readf, 7, radar_org
time=ii
acc_radar(*,*,time)=radar_org
close,7
endfor
openw,8,’d:/ARF/data/acc_radar_test.dat’
printf, 8, acc_radar
close,8
–2——————————————————————————–
lon_num=901
lat_num=1051
acc_radar=fltarr(lon_num, lat_num)
sum=fltarr(lon_num, lat_num) <<<<<<<<<<<<
findtxt=’d:/ARF/data/20100830/*.txt’
result1=file_search(findtxt,count=ct)
print, result1
close, /all
for ii=0, ct-1 do begin
openr,7, result1[ii]
radar_org=fltarr(lon_num, lat_num)
readf, 7, radar_org
acc_radar(*,*)=radar_org
sum=sum+acc_radar <<<<<<<<<<<<
close,7
endfor
openw,8,’d:/ARF/data/acc_radar_test.dat’
printf, 8, acc_radar
close,8
end