# NOT RUN {
r <- raster(nrows = 2, ncols = 2,
xmn = 0, xmx = 360, ymn = -90, ymx = 90, vals = 30)
# Generate dummy RasterBrick
b <- raster::brick(lapply(1:(365 * 3),
function(i) raster::setValues(r,
unif(n = raster::ncell(r), min = 0, max = 100))))
names(b) <- seq.Date(from = as.Date("1993-01-01"),
to = as.Date("1995-12-31"),
by = "day")
subset_datacube(r = b, from = "1993-01-01", to = "1993-01-01")
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab