| 查看: 1091 | 回复: 6 | |||
[求助]
Rg(x) vs time ,Rg(y) vs time,Rg(z) vs time
|
|
我给以国外的专家发了邮件，求的是回旋半径在xyz方向的变化，还有创腾讨论社区也有这个帖子，不晓得咋回事就是回复不了帖子，神贴在此https://community.accelrys.com/message/9323#9323 但这个帖子里面只有整体的回旋半径，我想分出方向来，求大神懂MS里面perl script的帮帮忙，求修改一下，另外请教一下为啥子创腾社区的帖子咋回哦 |
回复此楼» 猜你喜欢
职称评审没过，求安慰
已经有53人回复
-
毕业后当辅导员了，天天各种学生超烦
已经有5人回复
-
26申博自荐
已经有3人回复
-
A期刊撤稿
已经有4人回复
-
垃圾破二本职称评审标准
已经有17人回复
-
投稿Elsevier的Neoplasia杂志，到最后选publishing options时页面空白，不能完成投稿
已经有22人回复
-
EST投稿状态问题
已经有7人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 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小时
- 虫号: 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小时
- 虫号: 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小时
- 虫号: 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