-
Notifications
You must be signed in to change notification settings - Fork 71
Description
Ran test run and nothing in table. I am on mac. Have not tested on my windows PC. I may be overlooking something simple. Please advise.
Thanks!
library(splitr)
library(here)
trajectory_model <-
create_trajectory_model() %>%
add_trajectory_params(
lat = 43.45,
lon = -79.70,
height = 50,
duration = 24, # Increased duration
days = c("2020-07-01", "2020-07-02"), # Extended date range
daily_hours = c(0, 6, 12, 18), # More start times per day
direction = "backward",
met_type = "reanalysis",
met_dir = here::here("met"),
exec_dir = here::here("out")
) %>%
run_model()
trajectory_tbl <- trajectory_model %>% get_output_tbl()
print(nrow(trajectory_tbl))
print(head(trajectory_tbl))
trying URL 'ftp://arlftp.arlhq.noaa.gov/archives/reanalysis/RP202006.gbl'
Content type 'unknown' length 119139360 bytes (113.6 MB)
trying URL 'ftp://arlftp.arlhq.noaa.gov/archives/reanalysis/RP202007.gbl'
Content type 'unknown' length 123110672 bytes (117.4 MB)
trajectory_tbl <- trajectory_model %>% get_output_tbl()
print(nrow(trajectory_tbl))
[1] 0
print(head(trajectory_tbl))