关于fortran读取数据，请教高手

tjhno1

fortran读取数据 一般为逐行进行处理
我想请教大家 对于文本 假如其格式比较乱
如何读进一个给定形状的数组中？
例如 文本中数据有的是以空格分隔 有的是换行符分隔 有的一行有10个数 有的有8个数 比较乱
但我只知道总共有500个数据
如何读入一个25*20的数组或者20*25的数组
大家有没有现成的函数？
例如附件中的数据
要求读入 3*6数组 或6*3数组
1.txt:
aaa
bbbbbbbbbbbbb
3 1 23 52  35
12
12 233 25 35  38 52 38
12 12
13 28   25

kongfeng0824

有没有例子数据贴上来看看

tjhno1

kongfeng0824 发表于 2013-7-22 18:57

                               
登录/注册后可看大图

有没有例子数据贴上来看看

如上例 只知道总数据个数 其他均毫无规律

维欻?

直接按一维的数据读入，再排序就可以了

tjhno1

维欻? 发表于 2013-7-22 20:50

                               
登录/注册后可看大图

直接按一维的数据读入，再排序就可以了

一维怎么读？请教下代码？
read（1，*）a()?

aa22556688

先排成一维的，然后在转化成二位的。。。

又是那隻貓

用matlab吧，importdata

lesli123

用ultraedit打开文本文件，切换到16进制模式，把空格（二进制码为20）替换为回车换行（0D 0A），再切换到正常文本模式，这时显示为一个数据一行，不过有很多空行，在替换对话框中把^p^p替换为^p，反复执行多次就可消除空行，如下
aaa
bbbbbbbbbbbbb
3
1
23
52
35
12
12
233
25
35
38
52
38
12
12
13
28
25
最后每行只有一个数据，就方便读取了

维欻?

tjhno1 发表于 2013-7-22 21:00

                               
登录/注册后可看大图

一维怎么读？请教下代码？
read（1，*）a()?

real :: a(500)
open(unit=11,....)
read(11,*)  (a(i),i=1,500)
这样就可以了