# NOT RUN {
library(r3dmol)
r3dmol() %>%
m_add_isosurface(
data = cube_benzene_homo,
isoSpec = list(
isoval = -0.01,
color = "red",
opacity = 0.95
)
) %>%
m_set_style(
sel = list(cartoon = list()),
style = list(stick = list())
) %>%
m_zoom_to()
# }
Run the code above in your browser using DataLab