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

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » Fortran » 急：求用Fortran或者其他语言编写一个程序，处理下面的数据！！！！！！！！！！
北京石油化工学院2026年研究生招生接收调剂公告
383/4返回列表上一页1234下一页
查看: 2245  |  回复: 37
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

jpchou

专家顾问 (著名写手)
Shell Script + AWK

1.??????????????????(case.trace_fixdoping)

2.??????????1?к??4?е???????????????????????10??6?η?
> awk   '{print $1,$4}'   case.trace_fixdoping                ?????1?к??4?е?????
   awk   '{print $1,$4*1000000}'   case.trace_fixdoping  ?????????????10??6?η?

3.???м????????????????????????????? ????????? 1.txt ?? 2.txt??3.txt??????????????????飬????
> ????
awk '{if($1<800){print $1,$4 >> n".txt"} if($1==800){print $1,$4 >> n".txt"; n=n+1}}' case.trace_fixdoping
      
???????M?Y?????? T=10 ~ T=800
????? awk ??y????????Y?????? 800 ????????????n??
???? question 2
=>
awk '{if($1<800){print $1,$4*1000000 >> n".txt"}
       if($1==800){print $1,$4*1000000 >> n".txt"; n=n+1}}' case.trace_fixdoping




???????
awk '{if($1<800){printf ("%s  %15.8f\n", $1,$4*1000000) >> n".txt"}
       if($1==800){print ("%s  %15.8f\n",  $1,$4*1000000) >> n".txt"; n=n+1}}' case.trace_fixdoping

15.8f ??? ???? 15 λ????С???c???@????? 8 λ
??g???W??????????
???? 15.8e ?????
赞一下(2人) 回复此楼

» 本帖已获得的红花（最新10朵）

ljw4010
21楼2014-08-11 20:40:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ljw4010

荣誉版主 (职业作家)

小木虫从头派教主
送红花一朵
引用回帖:
21楼: Originally posted by jpchou at 2014-08-11 20:40:55
Shell Script + AWK

1.我的数据文件格式如下：(case.trace_fixdoping)

2.我需要提取第1列和第4列的数据，并将第四列数据乘以10的6次方
> awk   '{print $1,$4}'   case.trace_fixdoping                提 ...

多谢了，我今天花了一天时间看shell,也试着用shell做了下，比较理想能输出五个文件，但是不能循环控制，程序冗长，看了你的觉得爽快多了，帖子关了，送你一朵大红花！

[ 发自小木虫客户端 ]
赞一下 回复此楼
不要说话
22楼2014-08-11 21:02:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhangxnt

银虫 (小有名气)
引用回帖:
19楼: Originally posted by ljw4010 at 2014-08-11 18:12:33
很不错了，多谢哈！因为我的数据数量 是根据温度变化的（第一列），比如上次给你的数据是以最大温度800 ，温度梯度10 输出的数据，
1.可不可以让我自己任意输入最大温度和温度梯度，最大温度上线1000，下线300
2 ...

S(m) 这点我不是很明白，是指该行由 T...S 变成 Y[K]...S(m)，并且每个输出文件的 m 的内容要有你自己输入？
赞一下 回复此楼
23楼2014-08-12 08:29:46
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ljw4010

荣誉版主 (职业作家)

小木虫从头派教主
引用回帖:
23楼: Originally posted by zhangxnt at 2014-08-12 08:29:46
S(m) 这点我不是很明白，是指该行由 T...S 变成 Y...S(m)，并且每个输出文件的 m 的内容要有你自己输入？...

就是我给的那个数据文件是最大温度800的，温度步长是10，恰好这俩值控制行数，可不可以这俩值由我自己输入，比如我用1000,10也可以，300,5也可以！再就是s（m）,能达到这种效果也行：比如我输入m=1e18存放到1.txt的s（m）中,接着1e19或者1.1e18放到2.txt……最好m中e左右俩数按步长可控

[ 发自小木虫客户端 ]
赞一下 回复此楼
不要说话
24楼2014-08-12 08:43:40
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhangxnt

银虫 (小有名气)
引用回帖:
24楼: Originally posted by ljw4010 at 2014-08-12 08:43:40
就是我给的那个数据文件是最大温度800的，温度步长是10，恰好这俩值控制行数，可不可以这俩值由我自己输入，比如我用1000,10也可以，300,5也可以！再就是s（m）,能达到这种效果也行：比如我输入m=1e18存放到1.txt的 ...

http://pan.baidu.com/s/1dDCdwPV
希望这个可以有用..
赞一下 回复此楼

» 本帖已获得的红花（最新10朵）

ljw4010
25楼2014-08-12 09:23:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ljw4010

荣誉版主 (职业作家)

小木虫从头派教主
送红花一朵
引用回帖:
25楼: Originally posted by zhangxnt at 2014-08-12 09:23:24
http://pan.baidu.com/s/1dDCdwPV
希望这个可以有用.....

多谢多谢，我试了下，这个程序对我附件的数据处理挺好，但是我换了一个case就不行了，不知道运行这个程序还要注意什么。这个帖子昨天不小心被关了，金币不知道怎么送了，暂且送你大红花吧！
赞一下 回复此楼
不要说话
26楼2014-08-12 09:50:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhangxnt

银虫 (小有名气)
引用回帖:
26楼: Originally posted by ljw4010 at 2014-08-12 09:50:22
多谢多谢，我试了下，这个程序对我附件的数据处理挺好，但是我换了一个case就不行了，不知道运行这个程序还要注意什么。这个帖子昨天不小心被关了，金币不知道怎么送了，暂且送你大红花吧！...

可以把不行的case传给我看看么
赞一下 回复此楼
27楼2014-08-12 10:03:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ljw4010

荣誉版主 (职业作家)

小木虫从头派教主
引用回帖:
27楼: Originally posted by zhangxnt at 2014-08-12 10:03:37
可以把不行的case传给我看看么...

温度最大800，步长50的！
赞一下 回复此楼

» 本帖附件资源列表

  • 欢迎监督和反馈：小木虫仅提供交流平台，不对该内容负责。
    本内容由用户自主发布，如果其内容涉及到知识产权问题，其责任在于用户本人，如对版权有异议，请联系邮箱：xiaomuchong@tal.com
  • 附件 1 : case.trace_fixdoping
    • 2014-08-12 11:01:07, 12.26 K
不要说话
28楼2014-08-12 11:01:29
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ljw4010

荣誉版主 (职业作家)

小木虫从头派教主
引用回帖:
21楼: Originally posted by jpchou at 2014-08-11 20:40:55
Shell Script + AWK

1.我的数据文件格式如下：(case.trace_fixdoping)

2.我需要提取第1列和第4列的数据，并将第四列数据乘以10的6次方
> awk   '{print $1,$4}'   case.trace_fixdoping                提 ...

您好，我用了您的程序之后，出现一个问题，就是第一行数据为0.00000000，然后输出的最后一个数据文件为空？
可不可以帮我修改啊，然后最好输出的文件都有标题，标题格式如下：
T[K]    S(m)
其中m的值我可以控制，比如我输入m=1e18，输出文件标题就变成：
T[K]    S(1e18)
--------------------------
T[K]    S(1e19)
-----------------------------
T[K]    S(1e20)
--------------------------
-
--
-
-
等等
赞一下 回复此楼
不要说话
29楼2014-08-12 11:32:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhangxnt

银虫 (小有名气)
引用回帖:
26楼: Originally posted by ljw4010 at 2014-08-12 09:50:22
多谢多谢，我试了下，这个程序对我附件的数据处理挺好，但是我换了一个case就不行了，不知道运行这个程序还要注意什么。这个帖子昨天不小心被关了，金币不知道怎么送了，暂且送你大红花吧！...

http://pan.baidu.com/s/12FZNS

忘了设置温度下限了...不好意思
赞一下 回复此楼

» 本帖已获得的红花（最新10朵）

ljw4010
30楼2014-08-12 11:57:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 ljw4010 的主题更新
383/4返回列表上一页1234下一页
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 285求调剂 +7 AZMK 2026-04-05 12/600 2026-04-07 00:18 by AZMK
[考研] 调剂 +3 mcbbc 2026-04-06 4/200 2026-04-06 20:58 by lbsjt
[考研] 材料工程调剂 +3 小刘同学吖吖 2026-04-06 4/200 2026-04-06 20:56 by lbsjt
[考研] 一志愿北京2，材料与化工308求调剂 +13 熊二想上岸 2026-04-04 14/700 2026-04-06 19:42 by guanxin1001
[考研] 385分 生物学（071000）求调剂 +12 qf626 2026-04-01 12/600 2026-04-06 17:36 by 52305043001
[考研] 336材料与化工085600求调剂 +9 水星记infp 2026-04-05 12/600 2026-04-06 11:46 by 水星记infp
[考研] 复试调剂 +5 asdasdassda 2026-04-05 5/250 2026-04-06 09:32 by dongzh2009
[考研] 313求调剂 +5 海日海日 2026-04-04 5/250 2026-04-05 15:52 by jndximd
[考研] 一志愿华中农业大学0710（A）初试329分 求调剂 +4 一名26考研生 2026-04-04 4/200 2026-04-05 10:01 by barlinike
[考研] 男生，一志愿沪9生物学071000，初试308求调剂 +3 刘墨墨 2026-04-04 3/150 2026-04-05 08:26 by barlinike
[考研] 能动调剂326专硕 +4 wan112233 2026-04-04 4/200 2026-04-04 22:47 by yu221
[考研] 求材料调剂，一志愿郑州大学289分 +15 硕星赴 2026-04-03 15/750 2026-04-04 01:01 by userper
[考研] 求调剂，一志愿北京中医药大学 +3 小小达不溜 2026-04-02 3/150 2026-04-03 22:55 by 冲矢昴星团
[考研] 一志愿中国石油大学化学工程323分求调剂 +4 化工专硕323分 2026-04-03 6/300 2026-04-03 22:12 by dongzh2009
[考研] 325分化学调剂 +5 15771691647 2026-04-02 5/250 2026-04-03 09:58 by ChemPharm
[考研] 一志愿深大085601材料工程专业（专硕）300分可以调剂去哪 +8 10160315 2026-04-02 8/400 2026-04-03 09:36 by hypershenger
[考研] 材料工程322分 +8 哈哈哈吼吼吼哈 2026-04-01 8/400 2026-04-02 11:53 by 3041
[考研] 【求调剂】新能源材料本科，一志愿211，初试321 +6 求调剂学校， 2026-04-02 6/300 2026-04-02 09:41 by 晴空210210
[考研] 材料调剂 +11 一样YWY 2026-03-31 11/550 2026-04-01 22:25 by zhouyuwinner
[考研] 一志愿北京科技大学085601材料工程英一数二初试总分335求调剂 +5 双马尾痞老板2 2026-03-31 5/250 2026-04-01 09:04 by oooqiao
信息提示
关闭
请填处理意见
关闭