数据读取

雍正27

用Fortran从txt中读取数据，假如一行有6个数，每个数有一位，后面有一个空格，有30行，我想读入到一个30*6的数组中，设置了recl=14，read命令怎么写啊，总是读不进去，比较纠结，求指点

lqouc

为啥要用recl？你把二进制文件写在txt里面了？如果不是的话，只有设备号和文件名，其余全缺省然后直接read设备号和*就可以读了。

topmad

二进制数据采用recl  如果是ASCII的数据  不用设置recl

Aires

为什么要用recl呢？直接读不行么？读到一维数组中，如果你想变为b(30,6)，可以这样：b(30,6)=reshape(a,/30,6/)，其中a(180)

Aires

楼主有关编程作图的提问请在 编程作图提问版块提问 谢谢~

雍正27

Aires 发表于 2013-3-31 13:39

                               
登录/注册后可看大图

为什么要用recl呢？直接读不行么？读到一维数组中，如果你想变为b(30,6)，可以这样：b(30,6)=reshape(a,/30 ...

我想直接读取，因为数据中有的行是别的东西，不全是数，ps刚开始用这个论坛，这不是编程作图区吗？

雍正27

lqouc 发表于 2013-3-31 13:26

                               
登录/注册后可看大图

为啥要用recl？你把二进制文件写在txt里面了？如果不是的话，只有设备号和文件名，其余全缺省然后直接read设 ...

骞哥，那个数据不全是数，我想直接读取，不是二进制数据，就是个正常的十进制比如一行是这样的
1 2 3 4 5 6 然后一次读一行，放到一个x*6的矩阵里，就不会了

雍正27

topmad 发表于 2013-3-31 13:35

                               
登录/注册后可看大图

二进制数据采用recl  如果是ASCII的数据  不用设置recl

不全是数，想直接读取

lqouc

雍正27 发表于 2013-3-31 14:04

                               
登录/注册后可看大图

骞哥，那个数据不全是数，我想直接读取，不是二进制数据，就是个正常的十进制比如一行是这样的
1 2 3 4  ...

我勒个去啊，你还认识我啊。咱快别在这丢人了，就我这臭水平。话说不全是数字的话你可以用字符型读，一下读一整行，然后截取字符段转换为数字就可以了。如果全是数字你就列之间用显示循环，行内用隐式循环。

言深深

open(1,file="xx.txt")
do i=1,30
read(1,*)(x(i,j),j=1,6)
enddo
close(1)

这就是楼上几位说的程序，显式循环read行，隐式循环read列
x的数据类型自己定义就可以了···当然，这里面可以自行嵌套混搭风格的read方法，比如：
open(1,file="xx.txt")
do i=1,30
read(1,*)(y(i,j),j=1,2), (x(i,j),j=1,4)
enddo
close(1)