24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 886  |  回复: 5

7152075

铁杆木虫 (著名写手)

解决问题的方法比遇到的问题多

[求助] 如何将连续列的数对应的最小值提取出

本人刚刚接触Fortran代码,想将图片所有1,2,3,4……对应的那一列最小值提取出,比如第3个红色框的部分,写入文件中变成:
Step number  39  scan point     1  E=  -571.251770020
Step number   5  scan point      2  E=  -571.252807617
Step number   4  scan point     3  E=  -571.253234863
……
想求助大家代码应该怎么编写?如何将连续列的数对应的最小值提取出
图片1.jpg
回复此楼

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : result.txt
  • 2015-11-11 15:49:24, 546.88 K

» 猜你喜欢

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

Chemistry
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxws.2008

木虫 (正式写手)

读2次,后这次减前一次的,如果不是1,输出前一次的,如此循环,直到文本结束

发自小木虫Android客户端
2楼2015-11-11 22:17:03
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

7152075

铁杆木虫 (著名写手)

解决问题的方法比遇到的问题多

引用回帖:
2楼: Originally posted by wxws.2008 at 2015-11-11 22:17:03
读2次,后这次减前一次的,如果不是1,输出前一次的,如此循环,直到文本结束

我可能写的不太明确,我的意思是红框那里的所有的1中,找出E最小的,然后所有的2中,找到E最小的,然后所有的3中,找到最小的……依次类推,找到后,将1中最小的那一行,2中最小的那一行,3中最小的那一行……全部打印至文件中。
Chemistry
3楼2015-11-11 22:42:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxws.2008

木虫 (正式写手)

引用回帖:
3楼: Originally posted by 7152075 at 2015-11-11 22:42:54
我可能写的不太明确,我的意思是红框那里的所有的1中,找出E最小的,然后所有的2中,找到E最小的,然后所有的3中,找到最小的……依次类推,找到后,将1中最小的那一行,2中最小的那一行,3中最小的那一行……全部 ...

先设置一个足够大的数组,把数据读取完,然后循环1,2,3,4…… ,用pack语句提取出取1,2,3,4,……的数组,然后用minval函数得到最小值,lockmin函数得到最小值对应的位置,然后输出
4楼2015-11-12 09:30:08
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxws.2008

木虫 (正式写手)

引用回帖:
4楼: Originally posted by wxws.2008 at 2015-11-12 09:30:08
先设置一个足够大的数组,把数据读取完,然后循环1,2,3,4…… ,用pack语句提取出取1,2,3,4,……的数组,然后用minval函数得到最小值,lockmin函数得到最小值对应的位置,然后输出...

想起来了,直接用minval语句就可以
5楼2015-11-12 09:36:36
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

7152075

铁杆木虫 (著名写手)

解决问题的方法比遇到的问题多

引用回帖:
4楼: Originally posted by wxws.2008 at 2015-11-12 09:30:08
先设置一个足够大的数组,把数据读取完,然后循环1,2,3,4…… ,用pack语句提取出取1,2,3,4,……的数组,然后用minval函数得到最小值,lockmin函数得到最小值对应的位置,然后输出...

谢谢你热心的回复。

发自小木虫Android客户端
Chemistry
6楼2015-11-13 08:14:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 7152075 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿北京科技大学085601材料工程英一数二初试总分335求调剂 +6 双马尾痞老板2 2026-04-01 6/300 2026-04-01 23:33 by chaolymer
[考研] 材料调剂 +11 一样YWY 2026-03-31 11/550 2026-04-01 22:25 by zhouyuwinner
[考研] 0817化工学硕调剂 +11 努力上岸中! 2026-03-31 11/550 2026-04-01 20:30 by 赖春艳
[考研] 283求调剂 +9 A child 2026-03-28 9/450 2026-04-01 14:20 by Jaylen.
[考研] 302求调剂一志愿北航070300,本科郑大化学 +8 圣日耳曼条 2026-04-01 10/500 2026-04-01 14:03 by ZXlzxl0425
[考研] 一志愿中农0710生物学,微生物方向总分338求调剂 +3 柒xxxx. 2026-03-26 3/150 2026-04-01 12:30 by 冰乌龙
[考研] 一志愿北交材料工程总分358 +5 cs0106 2026-04-01 7/350 2026-04-01 11:45 by wangjy2002
[考研] 085701环境工程,267求调剂 +17 minht 2026-03-26 17/850 2026-04-01 09:11 by xiayizhi
[考研] 375求调剂 +7 雨夏整夜 2026-03-29 7/350 2026-03-31 18:52 by xhai2011
[考研] 一志愿西电085401数一英一299求调剂 六级521 +4 爱吃大鸭梨 2026-03-31 4/200 2026-03-31 11:51 by 搏击518
[考研] 南京大学化学调剂 +11 景随风 2026-03-29 16/800 2026-03-31 10:14 by herarysara
[有机交流] 甲基亚磺磺酸钠和甲基磺酸酯反应机理 10+3 kaobao456 2026-03-29 4/200 2026-03-30 23:16 by nBu锂
[考研] 332求调剂 +6 @MZB382400 2026-03-28 6/300 2026-03-30 16:57 by 无际的草原
[考研] 085701求调剂初试286分 +5 secret0328 2026-03-28 5/250 2026-03-30 12:54 by fangnagu
[考研] 311求调剂 +10 lin0039 2026-03-26 10/500 2026-03-30 10:26 by herarysara
[考研] 一志愿北京工业大学,324分求调剂 +6 零八# 2026-03-28 6/300 2026-03-29 21:20 by nanaliuyun
[考研] 332求92调剂 +8 蕉蕉123 2026-03-28 8/400 2026-03-29 10:46 by 周梓丹
[考研] 298求调剂 +4 种圣赐 2026-03-28 4/200 2026-03-29 08:42 by q1092522407
[考研] 308求调剂 +7 墨墨漠 2026-03-27 7/350 2026-03-28 07:43 by 热情沙漠
[考研] 330一志愿中国海洋大学 化学工程 085602 有读博意愿 求调剂 +3 wywy.. 2026-03-27 4/200 2026-03-28 03:32 by fmesaito
信息提示
请填处理意见