| 查看: 1260 | 回复: 6 | ||
[求助]
Rg(x) vs time ,Rg(y) vs time,Rg(z) vs time
|
|
我给以国外的专家发了邮件，求的是回旋半径在xyz方向的变化，还有创腾讨论社区也有这个帖子，不晓得咋回事就是回复不了帖子，神贴在此https://community.accelrys.com/message/9323#9323 但这个帖子里面只有整体的回旋半径，我想分出方向来，求大神懂MS里面perl script的帮帮忙，求修改一下，另外请教一下为啥子创腾社区的帖子咋回哦 |
回复此楼» 猜你喜欢
什么时候开奖？
已经有4人回复
-
咱们一起用铁证分析2026国家社科基金中标与否
已经有27人回复
-
为什么余额宝的年化利率越来越低？主要原因有哪些？
已经有3人回复
-
2027广东省杰青
已经有9人回复
-
朋友圈看到的
已经有5人回复
-
欢迎发来filecode的Mz6后的代码验证其规律
已经有110人回复
-
明天放榜？
已经有5人回复
-
时间戳变了，能看出什么问题？
已经有11人回复
-
重要消息，中午系统在维护
已经有10人回复
-
投稿咨询
已经有6人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- real time PCR 溶解曲线 目的产物后又出一个峰 怎么回事
已经有5人回复
- 求购求购 GDC-0973(XL518,RG7420) 现货或者定制
已经有3人回复
- Jörg Haus 2011版《Optical sensors》光学及传感的朋友们注意了！【转载】
已经有22人回复
- 非稳态计算时time step和max iteration number的影响
已经有10人回复
- 荧光定量 Real time 引物设计为什么要跨内含子？
已经有4人回复
- time-on-stream什么意思啊
已经有10人回复
- 【求助】各位虫友有谁做过RGDC四肽的H NMR图谱，求解谱。不胜感激！
已经有3人回复
- 请教real time pcr问题，谢谢！
已经有10人回复
- 荧光的decay time 和 lifetime 的测定
已经有14人回复
- 【求助/交流】做realtime-PCR，退火温度很重要吗？
已经有15人回复
- 【求助】求助：Linifanib ( ABT-869 , AL-39324, RG3635 )
已经有3人回复
- 【专题】评价一下您用的Real-Time PCR仪器
已经有26人回复
xujc1983
木虫 (著名写手)
苦逼青椒一枚
- 1ST强帖: 1
- 应助: 71 (初中生)
- 金币: 2065.3
- 散金: 2373
- 红花: 18
- 帖子: 1096
- 在线: 575.3小时
- 虫号: 285496
- 注册: 2006-10-14
- 性别: GG
- 专业: 凝聚态物性I:结构、力学和
2楼2012-08-03 12:39:56
3楼2012-08-03 14:39:36
xujc1983
木虫 (著名写手)
苦逼青椒一枚
- 1ST强帖: 1
- 应助: 71 (初中生)
- 金币: 2065.3
- 散金: 2373
- 红花: 18
- 帖子: 1096
- 在线: 575.3小时
- 虫号: 285496
- 注册: 2006-10-14
- 性别: GG
- 专业: 凝聚态物性I:结构、力学和
4楼2012-08-03 15:03:14
5楼2012-08-03 15:09:39
xujc1983
木虫 (著名写手)
苦逼青椒一枚
- 1ST强帖: 1
- 应助: 71 (初中生)
- 金币: 2065.3
- 散金: 2373
- 红花: 18
- 帖子: 1096
- 在线: 575.3小时
- 虫号: 285496
- 注册: 2006-10-14
- 性别: GG
- 专业: 凝聚态物性I:结构、力学和
6楼2012-08-03 15:27:30
|
主要是我不懂perl语言啊，而且这里面也基本没有源程序 求大神帮忙改改script： my $doc = $Documents{"my_trajectory.xtd"}; my $atoms = $doc->UnitCell->Sets("polymer"  ->Atoms; my $axes = $doc->CreatePrincipalAxes($atoms); my $mass; foreach my $atom (@$atoms) { $mass += $atom->Mass; } my $trj = $doc->Trajectory; for (my $i = 1; $i <= $trj->NumFrames; $i++) { $trj->CurrentFrame = $i; my $time = $trj->FrameTime; my $trace = $axes->PrincipalMoment1 +$axes->PrincipalMoment2 +$axes->PrincipalMoment3; my $Rg = sqrt($trace*0.5/$mass); printf "%g %g\n", $time, $Rg; } |
7楼2012-08-03 15:44:58
