回 帖 发 新 帖 刷新版面

主题:如何按列存放数据

我想在一个文件里存放很多数据,数据是这样的:x,y,rho(x,y)。前面的是坐标,后面的是每个坐标对应的值,x=0,对应一系列y和rho(0,y),x=1....分别对应各自的一系列y和rho(x,y),然后按列存放在一个文件里。
论坛搜了下,没看到有解的,所以来问下。
      OPEN(UNIT=1,STATUS='REPLACE',FILE='focus.DAT')  !STATUS='REPLACE肯定不行,因为新数据会把刚放上去的数据给覆盖掉,该怎么办呢?是不是在这里设置一下啊?

      DO IB=0,NX
      DO IA=1,NY
      write(1,*) IB, IA, RH(IB,IA)
      enddo
      ENDDO

回复列表 (共3个回复)

沙发

就是让数据存放的时候让x=1的一系列数据放在x=0对应一列数据的右边

板凳

DO IB=1,NX
      DO IA=1,NY
      write(1,*)  RH(IB,IA)
      enddo
      ENDDO
我看了。如果这样存放,结果数据全部在一列里了。郁闷着呢

3 楼

do j=1,60

  write(1,5) (x(j,i),i=1,60) !一次输出x的一行元素.

5 format(60f8.3)  !输出的60个元素,每个数据格式是f8.3

end do

这样可以实现目的

我来回复

您尚未登录,请登录后再回复。点此登录或注册