如何仅对文件某一列数据改变数值？

bustop

有一组大气廓线参数文件如下：
298.0  34
   0.158725    220.000    0.848451e-07    0.00456e-06 0  
      1.2546     223.000    0.849545e-07    0.00725e-06 0
      2.5420     244.000    0.856121e-07    0.01245e-06 0
    10.4520     255.000    0.951222e-07    0.14555e-06 0
......
.......  
第一列占11位，但小数点的位数有变化
第二列也占11位，数据规则一致
第三列和第四列都占15位，用e表示

我想只改变第二列的数值大小，其他不做改变，请问如何用fortran实现哪？

topmad

按照数组方式读进去，然后对数组进行修改就可以了

mofangbao

楼先自己做吧，思路楼上已经给你了，有具体问题再讨论，直接自己思考后收获是最多的

bustop

topmad 发表于 2012-7-7 10:12

                               
登录/注册后可看大图

按照数组方式读进去，然后对数组进行修改就可以了

我将数据读入四个数组一维数组，然后对第二数组赋值，再将数组写入，发现数据占的位数变化了。
譬如第一组可能变成  0.15872563             1.0000
                                          1.254632              1.0000
                                           2.542014             1.0000
                                          10.452023            1.0000
我没有控制格式输入，因为第一列有小数点位数变动。

言深深

楼上说的对！
将所有的文件读入到数组x（m，n）中，然后对x(i,11)进行操作，做好将所说的数据写到一个文件里面。

当然，如果不是大量的文件的话，可以直接在excel里面操作，操作步骤如下：
1，右击打开方式，选择excel；
2，数据这时候只有一列，选中，点击-->分类（数据那个选项里面）；
3，对数据分列的时候选中“空格”分列
4，得到所有的数据在每一个excel的一列里面，可以对你需要的列进行操作
5，保存数据，提示的（可能格式不正确，可以不管）都点击确认就可以了

mofangbao

言深深 发表于 2012-7-7 10:21

                               
登录/注册后可看大图

楼上说的对！
将所有的文件读入到数组x（m，n）中，然后对x(i,11)进行操作，做好将所说的数据写到一个文件 ...

深深你是不是看了前两期的非你莫属啊，哈哈  让我想起来那个每个问题都1 2 3 4的人，条理很清楚

mofangbao

bustop 发表于 2012-7-7 10:19

                               
登录/注册后可看大图

我将数据读入四个数组一维数组，然后对第二数组赋值，再将数组写入，发现数据占的位数变化了。
譬如第一 ...

你说的小数点位数不同是啥意思？ 这个跟给第二列赋值有什么关系呢？
能不能把你的原格式和目标格式都分别贴一下

mofangbao

我看不懂你的描述  什么第一组的变了 不知道说的啥  
还有为什么你的顶楼给出的数据第一行是两列，后面的变成了四列，到底是列数不定还是什么  感觉有点乱

言深深

mofangbao 发表于 2012-7-7 12:05

                               
登录/注册后可看大图

深深你是不是看了前两期的非你莫属啊，哈哈  让我想起来那个每个问题都1 2 3 4的人，条理很清楚

额，这个真没有！非要说的话，就是最近在组稿······

言深深

mofangbao 发表于 2012-7-7 12:09

                               
登录/注册后可看大图

我看不懂你的描述  什么第一组的变了 不知道说的啥  
还有为什么你的顶楼给出的数据第一行是两列，后面的变 ...

呵呵，估计楼主是想用格式读取的(read(1,fmt=""))，但是发现每个数据的格式都不一样，然后就纠结了呗。

其实可以无格式读取的，read(1,*)就可以了