Commit 87768a71 authored by LDalby's avatar LDalby
Browse files

Read grain dist file

parent 85979492
......@@ -40,8 +40,8 @@ path_desktop("goose", date_stamp, jobs, res_file) %>%
fst::read_fst() %>%
as_tibble() -> goose_numbers
path_desktop("Goose", date_stamp, jobs, "scenario-grain-distributions.txt_1521869_2018-11-12.fst") %>%
# path_desktop("Goose", date_stamp, jobs, "scenario-grain-distributions.txt_2057427_2018-12-29.fst") %>%
grain_dist_file <- glue("{jobs}_scenario-grain-distributions_{date_stamp}.fst")
path_desktop("goose", date_stamp, jobs, grain_dist_file) %>%
fst::read_fst() %>%
as_tibble() -> grain_dists
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment