maintainer_scripts.R

In sizespectrum/mizerExamples: A crowd-sourced repository of mizer size-spectrum models for various ecosystems

# A file with code snippets useful for the maintainer of mizerExamples
# Not part of the mizerExamples package, so added to .Rbuildignore

# Script for upgrading all packaged params objects
for (file in list.files("data")) {
    path <- paste0("data/", file)
    name <- load(path)
    print(name)
    if (is(get(name), "MizerParams")) {
        params <- upgradeParams(get(name))
        # Uncomment the next two lines if we want to run to new steady state
        # sim <- project(params)
        # params <- setInitialValues(params, sim)
        # 
        # We save with version 2 to be backwards compatible to R < 3.5
        assign(name, params)
        save(list = name, file = path, version = 2)
    }
}