Nothing
test_that("data.frame works", {
expect_no_error({
data("ndvi")
g = opgd(NDVIchange ~ ., data = as.data.frame(ndvi),
discvar = c("Tempchange","Precipitation","GDP","Popdensity"),
discnum = 3:6, cores = 1)
})
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.