Open Cuevman81 opened 3 weeks ago
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))
trajectory_tbl <- trajectory_model %>% get_output_tbl() print(nrow(trajectory_tbl)) [1] 0 print(head(trajectory_tbl)) A tibble: 0 × 12 ℹ 12 variables: run , receptor , hour_along , traj_dt , lat , lon , height , traj_dt_i , lat_i , lon_i , height_i , pressure
print(nrow(trajectory_tbl)) [1] 0 print(head(trajectory_tbl))
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)