data('dive.sim')
attach(dive.sim)
# basic plot
pl = plot(x = sim.obs, depth.bins = depth.bins)
# plot with stages overlaid
pl2 = plot(x = sim.obs, depth.bins = depth.bins, stages = sim.obs$stages)
# plot with trajectory underlaid
pl3 = plot(x = sim.obs, depth.bins = depth.bins, imputed.list = sim)
detach(dive.sim)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.