## Not run:
# ##--- Read aligned PDB coordinates (CA only)
# aln <- read.fasta(system.file("examples/kif1a.fa",package="bio3d"))
# pdbs <- read.fasta.pdb(aln)
#
# ##--- Read PDB coordinate for a new structure (all atoms)
# id <- get.pdb("2kin", URLonly=TRUE)
# pdb <- read.pdb(id)
#
# # add pdb to the alignment
# naln <- pdb2aln(aln=pdbs, pdb=pdb, id=id)
# naln
#
# ## End(Not run)
Run the code above in your browser using DataLab