test_that("FoliarMoistureContent", {
checkData('FoliarMoistureContent',
foliar_moisture_content,
list(data.table(LAT=LAT),
data.table(LONG=LONG),
data.table(ELV=ELV),
data.table(DJ=DJ),
data.table(D0=D0)))})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.