Skip to content

Commit

Permalink
run styler::style_pkg()
Browse files Browse the repository at this point in the history
  • Loading branch information
iantaylor-NOAA committed May 30, 2024
1 parent cfb686f commit e46dc16
Show file tree
Hide file tree
Showing 16 changed files with 735 additions and 676 deletions.
4 changes: 2 additions & 2 deletions R/AgeingError.R
Original file line number Diff line number Diff line change
Expand Up @@ -6,12 +6,12 @@
#' @importFrom graphics hist lines mtext par
#' @importFrom stats nlminb optim
#' @importFrom utils read.table str write.csv
#'
#'
#' @references
#' Punt, A.E., Smith, D.C., KrusicGolub, K., and Robertson, S. 2008.
#' Quantifying age-reading error for use in fisheries stock assessments,
#' with application to species in Australias southern and eastern scalefish and shark fishery.
#' Canadian Journal of Fisheries and Aquatic Sciences 65: 1991-2005.
#'
#'
#' @keywords internal
"_PACKAGE"
6 changes: 3 additions & 3 deletions R/CreateData.R
Original file line number Diff line number Diff line change
@@ -1,8 +1,8 @@
#' Read the ageing error data
#'
#'
#' @param DataFile Filename for input data
#' @param NDataSet Number of data sets within `DataFile`
#' @param verbose Return messages to the console (in addition to any output to
#' @param verbose Return messages to the console (in addition to any output to
#' `EchoFile`)
#' @param EchoFile A file path to a file that will be created or appended to if
#' it already exists to store information about your data inputs. The default
Expand Down Expand Up @@ -339,4 +339,4 @@ CreateData <- function(DataFile = "data.dat",
print(str(Outs))
}
return(Outs)
}
}
4 changes: 2 additions & 2 deletions R/CreateSpecs.R
Original file line number Diff line number Diff line change
@@ -1,5 +1,5 @@
#' Read the ageing error specifications
#'
#'
#' @param SpecsFile Filename for input specifications.
#' @param DataSpecs The output from CreateData()
#' @param verbose Return messages to the console (TRUE/FALSE)
Expand Down Expand Up @@ -254,4 +254,4 @@ CreateSpecs <- function(SpecsFile = "data.spc",
print(str(Outs))
}
return(Outs)
}
}
4 changes: 2 additions & 2 deletions R/DoApplyAgeError.R
Original file line number Diff line number Diff line change
@@ -1,5 +1,5 @@
#' Run the ageing error optimization routine
#'
#'
#' @param Species A string that will be used to create file names. Typically,
#' users will use the common name for the species of interest, especially if
#' you are saving files from multiple species in a single directory. Though,
Expand Down Expand Up @@ -296,4 +296,4 @@ DoApplyAgeError <- function(Species = "AgeingError",
SaveAll$sdreport <- rep
save(SaveAll, file = SaveFile)
return(model)
}
}
Loading

0 comments on commit e46dc16

Please sign in to comment.