## S3 method for class 'core':
print(x, vol = NULL, ...)
core.find
.core.find
, plot.core
##-- Generate a small kinesin alignment and read corresponding structures
pdbfiles <- get.pdb(c("1bg2","2ncd","1i6i","1i5s"), URLonly=TRUE)
pdbs <- pdbaln(pdbfiles)
##-- Find 'core' positions
core <- core.find(pdbs)
plot(core)
##-- Fit on these relatively invarient subset of positions
core.inds <- print(core, vol=0.5)
print(core, vol=0.7)
print(core, vol=1.0)
Run the code above in your browser using DataLab