## Not run:
# ## Fetch stucture
# pdb <- read.pdb( system.file("examples/1hel.pdb", package="bio3d") )
#
# ## Calculate normal modes
# modes <- nma(pdb)
#
# view.modes(modes, mode=7)
# ## End(Not run)
Run the code above in your browser using DataLab