# NOT RUN {
library(bio3d)
library(r3dmol)
# create bio3d object
pdb <- read.pdb("1bna")
# inspect bio3d object
pdb
# load bio3d object into r3dmol
r3dmol() %>%
m_add_model(data = m_bio3d(pdb)) %>%
m_zoom_to()
# }
Run the code above in your browser using DataLab