# NOT RUN {
d <- system.file("extdata", "setas-model-new-trunk", package = "atlantistools")
init <- file.path(d, "INIT_VMPA_Jan2015.nc")
load_init(init, vars = "Planktiv_S_Fish1_Nums")
load_init(init, vars = c("Planktiv_S_Fish2_ResN", "Planktiv_S_Fish3_ResN"))
load_init(init, vars = "Megazoobenthos_N")
# }
# NOT RUN {
dir <- "C:/Users/siebo/Documents/Atlantis/BalticAtlantis/run_files_73days_Nej"
init <- file.path(dir, "new_init_Baltic_05Dec2015_v2.nc")
vars <- "Sprat1_ResN"
load_init(init = init, vars = vars)
# }
Run the code above in your browser using DataLab