如何在fortran中跳过数据行 [英] How to skip a data line in fortran

问题描述

在此处输入图像描述

我有这个数据文件

，并且想读取此数据，而不用行1,2,3,4,5

and want to read this data without line 1,2,3,4,5

   program example

   real data(15,9)
   OPEN ( unit=10, file='filename'  )
   do i = 1, 15
     READ (10, *) (data(i,j), j=1,10)
   enddo

   print *, data(4,1), data(4,2), data(4,3)

   stop
   end

这是我的fortran代码.

this is my fortran code.

我该如何更改此代码

推荐答案

正在寻找类似的东西?

输入文件:数据

line1
line2 
line3
line4 
line5
line6
line7 
line8
line9 
line10

fortran代码:

implicit none
integer:: lskip,lread
character(len=20)::line
open(20, file = "data")
!skip first 5 line
do lskip = 1,5
  read(20,*)
End do
! First 5 lines skiped
! Now read actual lines
do lread = 1,5
  read(20,*)LINE
  write(*,*)line
End do
close(20)
end

结果

$gfortran so.f90
$./a.out 
 line6               
 line7               
 line8               
 line9               
 line10 

注意::这是一个最小的示例，仅用于显示跳过.您将更改内部读取lread循环以根据您的数据格式实际读取文件

NB: This is a minimal example, just for showing the skipping. You will change the read inside lread loop to actually read your file according to your data format

这篇关于如何在fortran中跳过数据行的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！