#' Plot a single tree in 3D
plot.standVizTree <- function(x, ...) {
plot3dShape(x$crown, col = x$crownColor)
plot3dShape(x$stem, col = x$stemColor)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.