tests/testthat.R

In James-Thorson/VAST: Vector-Autoregressive Spatio-Temporal (VAST) Model

# remotes::install_github("james-thorson-NOAA/FishStatsUtils", ref="dev")
# remotes::install_github("james-thorson-NOAA/VAST", ref="dev")
# remotes::install_local("C:/Users/James.Thorson/Desktop/Git/TMB_contrib_R/TMBhelper", force=TRUE, dep=FALSE)

# devtools::document("C:/Users/James.Thorson/Desktop/Git/FishStatsUtils")
# remotes::install_local("C:/Users/James.Thorson/Desktop/Git/FishStatsUtils", force=TRUE, dep=TRUE)
# devtools::document("C:/Users/James.Thorson/Desktop/Git/VAST")
# remotes::install_local("C:/Users/James.Thorson/Desktop/Git/VAST", force=TRUE, dep=FALSE)
# devtools::document("C:/Users/James.Thorson/Desktop/Git/FishStatsUtils")


library(testthat)
library(VAST)

## # Version
## Version_VAST = get_latest_version( package="VAST" )
## TmbDir = system.file("executables", package="VAST")

## # Use "extdata" in "inst" because its loaded with R packages
## singlespecies_example_path <- system.file("extdata", package="SpatialDeltaGLMM")
## multispecies_example_path <- system.file("extdata", package="VAST")

## # Check that single-species results are available locally
## test_path = file.path(singlespecies_example_path,"EBS_pollock")
## file.exists( file.path(test_path,"opt.RData") )

# Run tests for VAST
#setwd(system.file("tests", package="VAST"))
testthat::test_check("VAST")

################
# Local testing
################

# Use local path
# source( "C:/Users/James.Thorson/Desktop/Git/VAST/tests/testthat/setup.R" )

# Run from local directory
# testthat::test_dir( "C:/Users/James.Thorson/Desktop/Git/VAST/tests/testthat/", reporter="check" )