powered by
"pca"(pdbs, core.find = FALSE, fit = FALSE, ...)
pdbs
pdbaln
read.fasta.pdb
pca.xyz
data
pca.pdbs
pca
nma
attach(transducin) #-- Do PCA ignoring gap containing positions pc.xray <- pca(pdbs) # Plot results (conformer plots & scree plot) plot(pc.xray, col=annotation[, "color"]) detach(transducin)
Run the code above in your browser using DataLab