| 查看: 468 | 回复: 4 | |||
| 当前主题已经存档。 | |||
yq2240711金虫 (正式写手)
|
[交流]
【求助】从哪个输出文件怎提取出频率的数据
|
||
| 请问计算频率后,从哪个输出文件怎提取出频率的数据? 能不能详细点，谢谢! |
回复此楼» 猜你喜欢
电子信息270求调剂
已经有3人回复
-
071000生物学，一志愿深圳大学296分，求调剂
已经有11人回复
-
328求调剂
已经有6人回复
-
一志愿西电085401求调剂
已经有3人回复
-
284求调剂
已经有12人回复
-
材料与化工专硕306分找合适调剂
已经有14人回复
-
0854电子信息319求调剂（接受跨专业调剂）
已经有4人回复
-
283分求调剂
已经有12人回复
-
307分材料专业求调剂
已经有8人回复
-
生物工程求调剂
已经有11人回复
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
