Takes a selection and overwrites previous styling with given styles.
m_set_style(id, style = m_style_cartoon(), sel = m_sel())R3dmol id or a r3dmol object (the output from
r3dmol())
library(r3dmol)
# Add style to model
r3dmol() %>%
m_add_model(data = pdb_1j72, format = "pdb") %>%
m_add_style(style = m_style_cartoon()) %>%
m_zoom_to()