powered by
plot3D(knot, ...)
lines3d
spheres3d
link <- makeExampleKnot(k = FALSE) link <- newKnot(link$points3D, link$ends) ##plot with rgl require(rgl) plot3D(link) plot3D(link, radius = 0.1) plot3D(link, radius = 0.1, lwd = 10)
Run the code above in your browser using DataLab