应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » Fortran » 用fortran怎么读.CSV文件
52/1返回列表
查看: 6299  |  回复: 11
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

906527107

金虫 (小有名气)

[求助] 用fortran怎么读.CSV文件

求助：
   哪位高手知道怎么用fortran读.CSV格式的文件？
回复此楼

» 猜你喜欢
欲速则不达！！！
1楼 2013-11-25 20:50:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

virtualzx

木虫 (著名写手)

【答案】应助回帖

★
906527107: 金币+1, ★★★★★最佳答案 2013-11-27 12:14:42
引用回帖:
10楼: Originally posted by 906527107 at 2013-11-26 03:08:15
谢谢您的回复！现在已经用fortran读出了.csv文件。
但是我现在有上百个相同格式的文件（.csv），文件名称分别为temp1.csv~temp50.csv，请问怎样才能一次将这些文件全部读进去？
求程序！...

设立一个do循环，依次读取就行了
integer :: i
character(len=4) :: indstr
integer,parameter:: uid=...
do i=1,9999
  write(indstr,"(I4)"indstr
  open(file="temp"//trim(adjust(indstr))//".csv",unit=uid)
  读入数据
  close(uid)
end do
赞一下 回复此楼
11楼2013-11-27 07:08:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 12 个回答

jerkwin

专家顾问 (正式写手)

【答案】应助回帖

感谢参与，应助指数 +1
知道格式，和普通文件读法没区别
赞一下 回复此楼
2楼2013-11-25 22:38:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

virtualzx

木虫 (著名写手)

【答案】应助回帖

★ ★
感谢参与，应助指数 +1
906527107: 金币+2, ★有帮助 2013-11-26 10:15:10
取决于你要读什么样的文件了，文件的内容是什么样子的，每行是否列数相同，是否字符串、整数与小数数据混杂，是否指定类型出现在指定列，还是读取之前未知，有没有引号引起的字符串之类的。

不论什么情况都可以读入，但是你知道的信息越多编程量越低。

总的来说，最好先确定数据的尺寸，给存储数据的变量分配内存空间，（当然你想随读取随分配也没问题，就是慢点）
然后是用read逐行读入，对每一行用index函数逐个找到逗号，对每个子字符串根据变量类型存储到对应存储空间。

最简单的情形是每列宽度一定且已知，数据类型也已知，那么一个带格式的read就搞定了，都不需要找逗号。

最复杂的是如果每个元素的类型未知，就必须要用动态类型了。
赞一下 回复此楼
3楼2013-11-26 01:21:35
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

906527107

金虫 (小有名气)
引用回帖:
3楼: Originally posted by virtualzx at 2013-11-26 01:21:35
取决于你要读什么样的文件了，文件的内容是什么样子的，每行是否列数相同，是否字符串、整数与小数数据混杂，是否指定类型出现在指定列，还是读取之前未知，有没有引号引起的字符串之类的。

不论什么情况都可以读 ...

谢谢您的回复！

我的数据格式就是普通的.csv格式（和excel格式一样），我可以给你看下我的数据,谢谢！
1,1.000
  ...
10,2.000
  ...
100，3.000
  ...
1000,4.000
赞一下 回复此楼
欲速则不达！！！
4楼2013-11-26 10:24:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 12 个回答
普通表情 龙 兔 虎 猫
信息提示
关闭
请填处理意见
关闭