| 1 | 1/1 | 返回列表 |
| 查看: 2352 | 回復: 0 | |||
藍紫色玻璃心新蟲 (小有名氣)
|
[求助]
VMD分析殘基RMSD
|
看網(wǎng)上說用VMD自帶的rmsd-fullthrottle.tcl文件就可以對指定殘基計算RMSD,但是這個文件不是很明白(對程序一點都不明白 ),想問一下有沒有用這個程序計算RMSD的?我對這個文件里面應(yīng)該修改什么?或者能不能給個具體步驟?一點頭緒都沒有!# This script contains a procedure called rmsd_residue_over_time that calculates the average RMSD for each residue in a selection over all frames in a trajectory. The procedure is called as: # rmsd_residue_over_time mol sel_resid #where mol is the molecule in VMD and sel_resid is a list of the residue numbers in that selection. #You can use the procedure for any residue or list of residues. Here, as an example, we will make a selection for all residues in the protein. Note that this will take a long time to calculate: set sel_resid [[atomselect top "protein and alpha"] get resid] #The procedure is presented below. It also sets the B value to the value calculated, so you can color the protein by RMSD. The call for the procedure is at the end of the file. proc rmsd_residue_over_time {{mol top} res} { # use frame 0 for the reference set reference [atomselect 1 "protein" frame 0] # the frame being compared set compare [atomselect $mol "protein"] #make a selection with all atoms set all [atomselect top all] #get the number of frames set num_steps [molinfo $mol get numframes] foreach r $res { set rmsd($r) 0 } #loop over all frames in the trajectory for {set frame 1} {$frame < $num_steps} {incr frame} { puts "Calculating rmsd for frame $frame ..." # get the correct frame $compare frame $frame # compute the transformation set trans_mat [measure fit $compare $reference] # do the alignment $all move $trans_mat # compute the RMSD #loop through all residues foreach r $res { set ref [atomselect $mol "chain U and resid $r and noh" frame 0] set comp [atomselect $mol "chain U and resid $r and noh" frame $frame] set rmsd($r) [expr $rmsd($r) + [measure rmsd $comp $ref]] $comp delete $ref delete } } set ave 0 foreach r $res { set rmsd($r) [expr $rmsd($r)/$num_steps] # print the RMSD puts "RMSD of residue $r is $rmsd($r)" set res_b [atomselect $mol "resid $r"] $res_b set beta $rmsd($r) $res_b delete set ave [expr $ave + $rmsd($r)] } set ave [expr $ave/[llength $res]] puts " Average rmsd per residue: $ave" } #Call the procedure rmsd_residue_over_time top $sel_resid |
找到一些相關(guān)的精華帖子,希望有用哦~
| 1 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 求調(diào)劑 +7 | 爭取九點睡 2026-03-28 | 7/350 |
|
|---|---|---|---|---|
|
[考研] 312,生物學求調(diào)劑 +3 | 小譯同學abc 2026-03-28 | 3/150 |
|
|
[考研]
|
y7czhao 2026-03-26 | 10/500 |
|
|
[考研] 322求調(diào)劑 +5 | 舊吢 2026-03-24 | 5/250 |
|
|
[考研] 0703化學/290求調(diào)劑/本科經(jīng)歷豐富/工科也可 +9 | 丹青奶蓋 2026-03-26 | 10/500 |
|
|
[考研] 303求調(diào)劑 +7 | 安憶靈 2026-03-22 | 8/400 |
|
|
[論文投稿] Journal of Mechanical Science and Technology +3 | Russ_ss 2026-03-25 | 5/250 |
|
|
[考研] 294分080500材料科學與工程求調(diào)劑 +4 | 柳溪邊 2026-03-26 | 4/200 |
|
|
[考研] 調(diào)劑 +4 | 柚柚yoyo 2026-03-26 | 4/200 |
|
|
[考研] 【雙一流院校新能源、環(huán)境材料,材料加工與模擬招收大量調(diào)劑】 +4 | Higraduate 2026-03-22 | 8/400 |
|
|
[考研] 081200-11408-276學碩求調(diào)劑 +3 | 崔wj 2026-03-26 | 3/150 |
|
|
[考研] 085601求調(diào)劑總分293英一數(shù)二 +4 | 鋼鐵大炮 2026-03-24 | 4/200 |
|
|
[考研] 332求調(diào)劑 +6 | 032500 2026-03-25 | 6/300 |
|
|
[考研] 各位老師您好:本人初試372分 +5 | jj涌77 2026-03-25 | 6/300 |
|
|
[考研] 300分,材料,求調(diào)劑,英一數(shù)二 +5 | 超贊的 2026-03-24 | 5/250 |
|
|
[考研] 080500求調(diào)劑 +3 | zzzzfan 2026-03-24 | 3/150 |
|
|
[考研] 一志愿河北工業(yè)大學0817化工278分求調(diào)劑 +7 | jhybd 2026-03-23 | 12/600 |
|
|
[考研] 361求調(diào)劑 +3 | Glack 2026-03-22 | 3/150 |
|
|
[論文投稿] 急發(fā)核心期刊論文 +3 | 賢達問津 2026-03-23 | 5/250 |
|
|
[考研] 293求調(diào)劑 +3 | 濤濤Wjt 2026-03-22 | 5/250 |
|