# \dontshow{
# Hide setting tempfile, since a user would specify a persistent location
path <- tempdir()
# }
file <- system.file("extdata", "test-data.csv", package="ropenmeteo")
df <- readr::read_csv(file, show_col_types = FALSE)
df |>
add_longwave() |>
write_glm_format(path = path)
# \dontshow{
# tidy
unlink(path)
# }
Run the code above in your browser using DataLab