# NOT RUN {
library(r3dmol)
r3dmol() %>%
m_add_model(data = pdb_6zsl, format = "pdb") %>%
m_set_style(style = m_style_cartoon()) %>%
m_set_view(arg = c(20, -20, 10, -200, 0, 1, 0, 0)) %>%
m_add_outline(color = "blue")
# }
Run the code above in your browser using DataLab