| 查看: 446 | 回复: 4 | |||
| 当前主题已经存档。 | |||
yq2240711金虫 (正式写手)
|
[交流]
【求助】从哪个输出文件怎提取出频率的数据
|
||
| 请问计算频率后,从哪个输出文件怎提取出频率的数据? 能不能详细点，谢谢! |
回复此楼» 猜你喜欢
什么是人一生最重要的？
已经有6人回复
-
为什么中国大学工科教授们水了那么多所谓的顶会顶刊，但还是做不出宇树机器人？
已经有11人回复
-
网上报道青年教师午睡中猝死、熬夜猝死的越来越多，主要哪些原因引起的？
已经有9人回复
-
【博士招生】太原理工大学2026化工博士
已经有5人回复
-
280求调剂
已经有3人回复
-
面上可以超过30页吧？
已经有11人回复
-
版面费该交吗
已经有15人回复
-
体制内长辈说体制内绝大部分一辈子在底层，如同你们一样大部分普通教师忙且收入低
已经有18人回复
zhangfan2192
金虫 (著名写手)
- 应助: 9 (幼儿园)
- 金币: 1007.3
- 散金: 62
- 红花: 3
- 帖子: 1170
- 在线: 171.3小时
- 虫号: 648132
- 注册: 2008-11-07
- 性别: GG
- 专业: 理论和计算化学
2楼2009-11-05 10:51:32
★ ★
yq2240711(金币+1,VIP+0): 11-5 20:18
wuchenwf(金币+1,VIP+0):谢谢 11-5 23:03
yq2240711(金币+1,VIP+0): 11-5 20:18
wuchenwf(金币+1,VIP+0):谢谢 11-5 23:03
|
本帖内容被屏蔽 |
3楼2009-11-05 13:55:37
fanchen021
铁杆木虫 (正式写手)
- 应助: 7 (幼儿园)
- 金币: 7994.9
- 散金: 1844
- 红花: 4
- 帖子: 776
- 在线: 569小时
- 虫号: 773188
- 注册: 2009-05-18
- 专业: 理论和计算化学
★ ★
yq2240711(金币+1,VIP+0): 11-5 20:18
wuchenwf(金币+1,VIP+0):谢谢 11-5 23:03
yq2240711(金币+1,VIP+0): 11-5 20:18
wuchenwf(金币+1,VIP+0):谢谢 11-5 23:03
|
可以用下面的脚本 eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}' && eval 'exec perl -S $0 $argv:q' if 0; #;-*- Perl -*- use FindBin qw($Bin); $freqs = `grep 'THz' OUTCAR` ; @freqs = split /\n/ , $freqs ; $num = @freqs/2; open OUT , ">feq.dat" ; for($i=0; $i<$num; $i++){ $line = $freqs[$i] ; chomp($line) ; $line=~s/^\s+//g; @line=split /\s+/,$line; $f = $line[7],"\n" ; printf OUT "%20.6f \n",$f; printf "%20.6f \n",$f; } close OUT ; |
4楼2009-11-05 13:56:19
fanchen021
铁杆木虫 (正式写手)
- 应助: 7 (幼儿园)
- 金币: 7994.9
- 散金: 1844
- 红花: 4
- 帖子: 776
- 在线: 569小时
- 虫号: 773188
- 注册: 2009-05-18
- 专业: 理论和计算化学
5楼2009-11-05 13:57:55