library(aqp)
library(soilDB)
osd <- fetchOSD(c('appling', 'cecil', 'bonneau'))
# save to package
save(osd, file='../../../data/osd.rda', compress = 'xz')
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.