关于160站降水

DARIO

老师给了160站降水资料，可是完全看不明白，请问资料是怎么读取的？还有，就是如果要读取西南地区的12月降水资料怎么读取

guotingsaijin

赚金币啦啦

river

这个难道不是应该去问一下老师吗，或者自己先搜索一下吗。或者直接去国家气候中心看看

huangyue

楼主可以看一下这个，不过数据的时间可能要问一下你们老师

言深深

这是我帮一孩子写的用于批量处理160站点资料的程序，数据是从气候中心网站下载最新的···
你的数据貌似是已经合并好了的···

不知道你对fortrtan懂了多少，自己照着写或者改改吧

parameter(m=160,n=756)
real x(m,n),xx(12,8,20,63)
character*20 mon

do im=1,11
        if(im.le.9)then
                write(mon,"(i1)")im
                open(1,file="温度数据\t160"//trim(mon)//".txt")
        else
                write(mon,"(i2)")im
                open(1,file="温度数据\t16"//trim(mon)//".txt")
        endif

        do k=1,63
        do i=1,8
        read(1,*)(xx(im,i,j,k),j=1,20)
        enddo
        enddo

        close(1)
enddo
        open(1,file="温度数据\t1612.txt")
        do k=1,62
        do i=1,8
        read(1,*)(xx(im,i,j,k),j=1,20)
        enddo
        enddo
        close(1)

do i=1,8
do j=1,20
do k=1,63
do im=1,12
        x((i-1)*20+j,(k-1)*12+im)=xx(im,i,j,k)
enddo
enddo
enddo
enddo

end

penghuxinhua

资料 记事本打开 先看格式整齐不
根据格式在写

步绝尘_南山居士

你的这个文件是12月的降水，r1612，打开之后，160个站，每个站每年的12月降水按照时间排列，前160个数据就是160个站的51年12月降水（160站是51开始的），然后是52、53...以此类推，仅仅是西南地区的话，你要看下地图，西南的站有几个，对应站号和顺序，进行挑选，再去读取资料。

唐卡卡55

浩彬

步绝尘_南山居士 发表于 2014-3-29 19:24
你的这个文件是12月的降水，r1612，打开之后，160个站，每个站每年的12月降水按照时间排列，前160个数据就 ...

你好想请问一下，160站的数据，是按顺序是横着读取还是竖着读取呢？

步绝尘_南山居士

浩彬 发表于 2014-5-1 19:52
你好想请问一下，160站的数据，是按顺序是横着读取还是竖着读取呢？

那个数据的存放是这样的，比如你有51-10年的1月份降水文件，那就是51年160站，然后52年160站，以此类推，横着读取，每年的160站，再度下一年。