knitr::opts_chunk$set(echo = TRUE)
library(graph3d) dat <- data.frame(x = c(1,1,2,2), y = c(1,2,1,2), z = c(1,2,3,4)) graph3d(dat, type = "bar", zMin = 0)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.