This function writes the csv file of the labelled twilight which can be read with TRAINSET https://trainset.raphaelnussbaumer.com/.
Usage
twilight_label_write(
tag,
file = glue::glue("./data/twilight-label/{tag$param$id}.csv"),
quiet = FALSE
)
Arguments
- tag
a GeoPressureR
tag
object- file
Name of the twilight label file to be saved.
- quiet
logical to hide messages
See also
Other geolight:
geolight_map()
,
twilight_create()
,
twilight_label_read()
Examples
setwd(system.file("extdata", package = "GeoPressureR"))
tag <- tag_create("18LX", quiet = TRUE) |>
tag_label(quiet = TRUE) |>
twilight_create()
label_file <- twilight_label_write(tag)
#> ✔ ./data/twilight-label/18LX.csv written successfully.
str(read.csv(label_file))
#> 'data.frame': 28 obs. of 4 variables:
#> $ series : chr "Set" "Rise" "Set" "Rise" ...
#> $ timestamp: chr "2017-07-27T03:05:00Z" "2017-07-27T18:30:00Z" "2017-07-28T03:20:00Z" "2017-07-28T18:45:00Z" ...
#> $ value : num 905 390 920 405 900 ...
#> $ label : int 1 1 1 1 1 1 1 1 1 1 ...