Create a new Include object.
new_include(
name,
variable,
mandatory = FALSE,
visible = TRUE,
invisible = NA_real_,
loaded = TRUE,
hidden = FALSE,
status = TRUE,
overlap = NA_character_,
id = uuid::UUIDgenerate(),
pane = paste(uuid::UUIDgenerate(), variable$index, sep = "-")
)
name |
|
---|---|
variable | Variable object. |
mandatory |
|
visible |
|
invisible |
|
loaded |
|
hidden |
|
status |
|
overlap |
|
id |
|
pane |
|
A Include object.
# find data file paths
f1 <- system.file(
"extdata", "projects", "sim_raster", "sim_raster_spatial.tif",
package = "wheretowork"
)
f2 <- system.file(
"extdata", "projects", "sim_raster", "sim_raster_attribute.csv.gz",
package = "wheretowork"
)
f3 <- system.file(
"extdata", "projects", "sim_raster", "sim_raster_boundary.csv.gz",
package = "wheretowork"
)
# create new dataset
d <- new_dataset(f1, f2, f3)
# create new variable
v <- new_variable_from_auto(d, index = 1)
# create a new include
w <- new_include(name = "Protected areas", variable = v)
# print object
print(w)
#> Include
#> id: 16677ea9-821d-48a8-a0e6-c956e46f55cb
#> name: Protected areas
#> variable: .../sim_raster_spatial.tif#Brown_necked_Parrot_Brown_necked_ [total: 1052 ]
#> pane: d38f85a1-a63e-4cbf-9838-f42225ec7cec-Brown_necked_Parrot_Brown_necked_
#> visible: TRUE
#> invisible: NA
#> loaded: TRUE
#> hidden: FALSE
#> status: TRUE
#> overlap: NA