r4ss (version 1.36.1)

SS_varadjust: Modify variance and sample size adjustments in the control file

Description

Function has not been fully tested yet

Usage

SS_varadjust(dir = "C:/myfiles/mymodels/myrun/",
  ctlfile = "control.ss_new", newctlfile = "control_modified.ss",
  keyword = "variance adjustments", newtable = NULL, newrow = NULL,
  rownumber = NULL, maxcols = 100, maxrows = 100,
  overwrite = FALSE, version = "3.30", verbose = TRUE)

Arguments

dir

Directory with control file to change.

ctlfile

Control file name. Default="control.ss_new".

newctlfile

Name of new control file to be written. Default="control_modified.ss".

keyword

Keyword to use as reference for start of section on variance adjustments

newtable

Optional table of new variance adjustment values

newrow

Optional vector of new variance adjustment values for a particular row

rownumber

Which of the 6 rows to replace with 'newrow' if present?

maxcols

Maximum number of columns to search among in 3.24 models (may need to increase from default if you have a huge number of fleets)

maxrows

Maximum number of rows to search among in 3.30 models (may need to increase from default if you have a huge number of fleets)

overwrite

Overwrite file if it exists?

version

SS version number. Currently only "3.24" or "3.30" are supported, either as character or numeric values (noting that numeric 3.30 = 3.3).

verbose

TRUE/FALSE switch for amount of detail produced by function. Default=TRUE.

See Also

SS_tune_comps, SS_parlines, SS_changepars

Examples

# NOT RUN {
   
# }
# NOT RUN {
     # load model output into R
     replist <- SS_output(dir='c:/model/')

     # get new variance adjustments (
     varadjust <- SS_tune_comps(replist, option="Francis")
     print(varadjust)

     # write new table to file
     SS_varadjust(dir=replist$inputs$dir, newctlfile="new_control.ss",
                  newtable=varadjust, overwrite=FALSE)
   
# }