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

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » Fortran » 急：求用Fortran或者其他语言编写一个程序，处理下面的数据！！！！！！！！！！
383/4返回列表上一页1234下一页
查看: 2136  |  回复: 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下一页
普通表情 龙 兔 虎 猫
信息提示
关闭
请填处理意见
关闭