# NOT RUN {
library(r3dmol)
r3dmol() %>%
m_add_model(data = pdb_6zsl, format = "pdb") %>%
m_add_label(
"Label",
options = list(
position = m_vector3(-6.89, 0.75, 0.35),
backgroundColor = "#666666",
backgroundOpacity = 0.9
)
) %>%
m_zoom_to()
# }
Run the code above in your browser using DataLab