| 查看: 1603 | 回复: 4 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
astringent铜虫 (著名写手)
|
[交流]
【求助】如何提取TXT中某列的数据存入一个数组，再对数组做处理 已有4人参与
|
||
|
我的数据存在aaa.txt文件中。对于上面的数据，第二列是步数（step），第三列是每步的可能取值。我想将这些数据读入，并保存在数组H（io，istep）中。io可以取从1到30000但是只有当io取文件中第二列对应的值时H（io，istep）=1，取其他值均为0.也就是说当step=1时，io取15733，18193，20251时H的值为1，取其他值都为0，当step=2时，io取15733，20251时H的值为1，取其他值都为0。我应该怎样实现呢，我想了好久还是没想出来。请大家帮我想想办法，先谢谢了。 1 15733 1 18193 1 20251 2 15733 2 20251 3 20824 4 15733 4 16159 4 18193 4 20251 4 20824 5 16159 5 18193 5 20251 5 20824 6 15733 6 20251 6 20824 7 15733 7 20251 7 20824 8 15733 8 16159 8 18193 8 20251 9 18193 9 20251 10 9490 10 16159 10 20251 |
回复此楼» 猜你喜欢
咱们一起用铁证分析2026国家社科基金中标与否
已经有27人回复
-
为什么余额宝的年化利率越来越低？主要原因有哪些？
已经有3人回复
-
2027广东省杰青
已经有9人回复
-
朋友圈看到的
已经有5人回复
-
欢迎发来filecode的Mz6后的代码验证其规律
已经有110人回复
-
明天放榜？
已经有5人回复
-
时间戳变了，能看出什么问题？
已经有11人回复
-
重要消息，中午系统在维护
已经有10人回复
-
投稿咨询
已经有6人回复
-
时间戳又变了8-15
已经有26人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 使用PGI编译VASP中无法使用长数组
已经有5人回复
- 怎样将for循环的结果存入数组
已经有6人回复
- 请教一个应用read时出现数组越界的问题，谢谢
已经有7人回复
- 简单数组最值求解-谢谢
已经有4人回复
- 怎么把从键盘输入的多个字符串分别赋值给字符串数组的一个个元素？
已经有6人回复
- 三维数组换行输入到文件（intel fortran 编译器）
已经有6人回复
- 关于c语言的一个小问题 坐等回复啊 急啊 是关于建立数组的
已经有9人回复
- 从txt文件读数据到二维数组
已经有4人回复
- 【求助】请问一个数组问题
已经有3人回复
- 【求助】C# 中如何声明结构体数组并赋值
已经有13人回复
- 【求助】一个求数组绝对值的小问题
已经有7人回复
- 【求助】大家帮忙看看数组存值和引用
已经有5人回复
- 【求助】module里面能够让数组从外部接受一些数据吗？【已完结】
已经有8人回复
- 【求助】ANSYS定义数组时，如何从TXT文件中导入？
已经有7人回复
astringent
铜虫 (著名写手)
- 应助: 16 (小学生)
- 金币: 2210.7
- 散金: 1233
- 红花: 4
- 帖子: 1180
- 在线: 354.8小时
- 虫号: 900839
- 注册: 2009-11-12
- 专业: 理论和计算化学
5楼2010-12-03 02:57:41
2楼2010-12-02 07:19:18
★ ★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
余泽成(金币+3):谢谢参与应助！ 2010-12-06 15:18:15
小木虫(金币+0.5):给个红包，谢谢回帖交流
余泽成(金币+3):谢谢参与应助！ 2010-12-06 15:18:15
|
program example implicit none integer,parameter :: max_step=10,max_data=10 integer :: test(max_data,max_step)=0,H(30000)=0,counter(max_step)=0 integer :: istep,idata open(unit=8,file="aaa.txt",status="old"  1 read(8,*,end=2) istep,idata ! write(*,*) istep,idata H(idata)=1 counter(istep)=counter(istep)+1 test(counter(istep),istep)=idata goto 1 2 close(8) end program example [ Last edited by piduil on 2010-12-2 at 09:41 ] |
3楼2010-12-02 09:37:27
maomao1210
金虫 (正式写手)
- 程序强帖: 5
- 应助: 2 (幼儿园)
- 金币: 1432.8
- 散金: 242
- 红花: 16
- 沙发: 1
- 帖子: 991
- 在线: 442.1小时
- 虫号: 253215
- 注册: 2006-05-20
- 性别: MM
- 专业: 考古理论
4楼2010-12-02 10:05:39
