Creates NetCDF based on dimension from another NetCDF with custom dimensions, and attributes
Usage
obs_nc(
lat,
lon,
time_nc,
vars_out = c("total", "bio", "ocn", "fossil", "fire"),
units_out = "(ppb/nanomol m-2 s-1)*nanomol m-2 s-1",
nc_out,
larrays,
verbose = FALSE
)
Examples
{
# Do not run
# nc_path <- paste0("Z:/footprints/aircraft/flask/2018",
# "/04/hysplit2018x04x08x15x15x38.7459Nx077.5584Wx00594.nc")
# foot <- obs_nc_get(nc_path, all = TRUE)
# nco <- paste0(tempfile(), "2.nc")
# file.remove(nco)
# obs_nc(lat = foot$lat,
# lon = foot$lon,
# time_nc = ISOdatetime(2018, 4, 8, 15, 15, 38),
# vars_out = c("a", "b"),
# nc_out = nco,
# larrays = list(a = foot, b = foot),
# verbose = TRUE)
}
#> NULL