# NOT RUN {
if (mlr3misc::require_namespaces(c("sf", "skmeans", "plotly"), quietly = TRUE)) {
library(mlr3)
library(mlr3spatiotempcv)
task_st = tsk("cookfarm")
resampling = rsmp("sptcv_cluto", folds = 5, time_var = "Date")
resampling$instantiate(task_st)
# plot
autoplot(resampling, task_st)
autoplot(resampling, task_st, fold_id = 1)
autoplot(resampling, task_st, fold_id = c(1, 2))
}
# }
Run the code above in your browser using DataLab