Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/fortran/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Io 如何在Fortran中编写没有换行符的代码?_Io_Fortran - Fatal编程技术网

Io 如何在Fortran中编写没有换行符的代码?

Io 如何在Fortran中编写没有换行符的代码?,io,fortran,Io,Fortran,我正在编写一段代码,我计划用它编写一个10x10001矩阵的.txt文件: do i = 1, 10 read(1,10) seed !Read a number from file 1 write(2,20) seed !Write that number in file 2 do k = 1, 10000 seed = mod((a*seed),m) R = seed/m write(2,20) R !I want a

我正在编写一段代码,我计划用它编写一个10x10001矩阵的
.txt
文件:

do i = 1, 10
    read(1,10) seed !Read a number from file 1
    write(2,20) seed !Write that number in file 2
    do k = 1, 10000 
        seed = mod((a*seed),m)
        R = seed/m
        write(2,20) R !I want all these numbers to be next to the seed, not on new lines
    end do
end do
但是所有的
R
都写在新行上


有没有办法用一个空间来分隔每个数字而不是一个新行,或者我应该用C++和流水线实现这个相同的代码吗?< /p> 你可以让<代码>写<代码>在结尾不加一个换行符,代码如下:

write(2, 20, advance="no") R

工作起来很有魅力。谢谢对于“read”是否有类似的功能?然后,我需要逐列读取每行以执行一些操作(nice.:)读取空格分隔的值有点棘手,但仍然可行。查看帖子。我在python中使用numpy解决了这个问题:np.loadtxt将整个内容作为矩阵导入,然后我可以切片我想要的部分。不过,谢谢。从性能角度看,最好将值组合到一个数组中,然后立即写入整个内容。(或一次至少一整条100001元素线)。