24小时热门版块排行榜    

查看: 5271  |  回复: 11

906527107

金虫 (小有名气)

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

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

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

欲速则不达!!!
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
回帖支持 ( 显示支持度最高的前 50 名 )

heyzol

金虫 (正式写手)

小木虫:沙发+99,金币+99,恭喜抢个沙发,再给个红包
6楼2013-11-26 11:04:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通回帖

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的回帖

heyzol

金虫 (正式写手)

【答案】应助回帖

★ ★
感谢参与,应助指数 +1
906527107: 金币+2, ★★★很有帮助 2013-11-26 13:50:50
正常read就行,fortran会自动跳过逗号
小木虫:沙发+99,金币+99,恭喜抢个沙发,再给个红包
5楼2013-11-26 10:57:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

heyzol

金虫 (正式写手)

【答案】应助回帖

记事本中的红字是【行标号】,不是文本的内容。
小木虫:沙发+99,金币+99,恭喜抢个沙发,再给个红包
7楼2013-11-26 11:07:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

virtualzx

木虫 (著名写手)

引用回帖:
4楼: Originally posted by 906527107 at 2013-11-25 21:24:32
谢谢您的回复!

我的数据格式就是普通的.csv格式(和excel格式一样),我可以给你看下我的数据,谢谢!
1,1.000
  ...
10,2.000
  ...
100,3.000
  ...
1000,4.000...

如果数据类型这么固定的话就比较容易,假设你所有整数都没有小数点,所有小数都有小数点或者是指数形式,那么就很简单:
integer :: a(1000)
double precision :: b(1000)
  open (file="filename.csv",unit=uid)
  read(uid,*)(a(i),b(i),i=1,1000)
8楼2013-11-26 12:24:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

906527107

金虫 (小有名气)

引用回帖:
6楼: Originally posted by heyzol at 2013-11-26 11:04:45
这么试试

谢谢您的回复!现在已经用fortran读出了.csv文件。
但是我现在有30个相同格式的文件(.csv),文件名称分别为temp1.csv~temp30.csv,请问怎样才能一次将这些文件全部读进去?
欲速则不达!!!
9楼2013-11-26 13:50:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

906527107

金虫 (小有名气)

引用回帖:
8楼: Originally posted by virtualzx at 2013-11-26 12:24:57
如果数据类型这么固定的话就比较容易,假设你所有整数都没有小数点,所有小数都有小数点或者是指数形式,那么就很简单:
integer :: a(1000)
double precision :: b(1000)
  open (file="filename.csv&q ...

谢谢您的回复!现在已经用fortran读出了.csv文件。
但是我现在有上百个相同格式的文件(.csv),文件名称分别为temp1.csv~temp50.csv,请问怎样才能一次将这些文件全部读进去?
求程序!
欲速则不达!!!
10楼2013-11-26 16:08:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 906527107 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[访问学者] 公派访问学者申请还是审核中吗? +4 326lhpqk 2024-06-28 5/250 2024-06-29 20:15 by shi01587
[基金申请] 申请基金前是不是要去拜一下蔡徐坤? +4 3115321 2024-06-28 4/200 2024-06-29 19:21 by 畅21
[论文投稿] 求助光催化方向二区末,三区期刊 5+3 糖糖不落布 2024-06-27 8/400 2024-06-29 15:24 by 糖糖不落布
[硕博家园] 考博英语 +8 198新用户 2024-06-25 15/750 2024-06-29 15:02 by Lucaswu
[论文投稿] 关于论文第一通讯作者的问题? +12 winsaint 2024-06-26 12/600 2024-06-29 14:15 by 杨18354098226
[论文投稿] 我在写关于多维空间的论文,希望能与大家交流,准备在science上发表 +10 lgf519 2024-06-24 14/700 2024-06-29 01:16 by f1yfish
[基金申请] 博后BC就没人问么?存在感好低啊! +5 qade544 2024-06-28 5/250 2024-06-29 00:20 by 666中
[有机交流] 过柱子,产品,杂质在是 pe:ea=100:1 也一起出来? +6 w256 2024-06-25 6/300 2024-06-28 18:15 by 我想更懂你29
[考博] 2025年博士申请——电催化方向 +3 蜗牛123.... 2024-06-27 3/150 2024-06-28 12:29 by highxixi
[基金申请] 专科院校申请国自然 +18 孤单12站 2024-06-24 33/1650 2024-06-28 12:26 by sunjc
[考博] 申博找导师 +4 疏影横斜水清浅3 2024-06-26 5/250 2024-06-28 11:15 by 安塔瓦拉多
[考博] 论文被硕导卡 +6 自强不息a?a 2024-06-26 9/450 2024-06-27 21:37 by chemhua
[论文投稿] Nano energy 投稿一个月with editor 到今天状态没有变过 5+3 甜甜甜。 2024-06-26 3/150 2024-06-27 18:00 by nono2009
[基金申请] 75批面上出结果了么?系统卡的进不去了 +4 wziguang33 2024-06-27 4/200 2024-06-27 15:53 by xter9665
[有机交流] 脱酯基合成步骤 5+4 小辉灰@anhui 2024-06-25 8/400 2024-06-27 11:17 by 火龙骑士
[有机交流] 有机物的酸酐如何准确表征 10+3 方酱 2024-06-24 7/350 2024-06-26 17:53 by 宁静远行
[找工作] 老博士选高校 5+5 woodhead8386 2024-06-24 8/400 2024-06-26 16:35 by 大大熊呀
[考博] 申博好难 +6 自强不息a?a 2024-06-24 6/300 2024-06-25 23:02 by 考研吒儿
[基金申请] 这样的说辞是上会了吗 +12 学员d3zYCz 2024-06-24 15/750 2024-06-25 22:05 by 3115321
[基金申请] 博后面上到底什么时候出结果??? +7 爱学lsy 2024-06-24 7/350 2024-06-25 19:24 by 暴走的蒜泥
信息提示
请填处理意见