## Not run: 
# ##- Align PDBs (from vector of filenames)
# #files <- get.pdb(c("4q21","5p21"), URLonly=TRUE)
# files <- get.pdb(c("4q21","5p21"), path=tempdir(), overwrite=TRUE)
# pdbaln(files)
# 
# 
# ##- Align PDBs (from list of existing PDB objects)
# pdblist <- list(read.pdb(files[1]), read.pdb(files[2]))
# pdbaln(pdblist)
# 
# ## End(Not run)
Run the code above in your browser using DataLab