# NOT RUN {
library(r3dmol)
r3dmol() %>%
m_add_model(data = pdb_1j72, format = "pdb") %>%
m_set_style(
style = list(stick = list(radius = 0.15), cartoon = list())
) %>%
m_add_res_labels(
sel = list(resn = "GLY"),
style = list(
font = "Arial",
fontColor = "white",
backgroundColor = "black",
showBackground = TRUE
)
) %>%
m_zoom_to()
# }
Run the code above in your browser using DataLab