cry_demo()
cry_demo(system.file("orthorhombic_p.cif", package = "rgl.cry"))
# \donttest{
if (interactive()) {
cry_demo(file, type = "fill", zoom = 0.5)
cry_demo("https://www.crystallography.net/cod/foo.cif")
}
# }
Run the code above in your browser using DataLab