# subset of cookfarm task for smaller vdiffr snaps
# sampling 2 observations per Date+SOURCEID group
set.seed(42)
# b = as_data_backend(as.data.table(cookfarm_mlr3)[, .SD[sample(x = .N, size = 2)], by = .(Date, SOURCEID)])
b = readRDS(test_path("data", "cookfarm_subset.rds"))
b$hash = "_mlr3_tasks_cookfarm_"
tsk_cookfarm_sub = TaskRegrST$new(
id = "cookfarm", b, target = "PHIHOX",
coordinate_names = c("x", "y"), coords_as_features = FALSE,
crs = 26911
)
tsk_cookfarm_sub$set_col_roles("Date", roles = "time")
tsk_cookfarm_sub$set_col_roles("SOURCEID", roles = "space")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.