streamline code

Author: RobLBaker

inst/rmarkdown/templates/NPS_DRR/skeleton/skeleton.Rmd

@@ -102,7 +102,7 @@ dataPackage_fileDescript <- c(
 ```
 
 ```{r setup_do_not_edit, include=FALSE}
-RRpackages <- c("markdown",
+Rpackages <- c("markdown",
                 "rmarkdown",
                 "pander",
                 "knitr",
@@ -112,11 +112,11 @@ RRpackages <- c("markdown",
                 "tidyverse",
                 "here")
 
-inst <- RRpackages %in% installed.packages()
-if (length(RRpackages[!inst]) > 0) {
-  install.packages(RRpackages[!inst], dep = TRUE, repos = "https://cloud.r-project.org")
+inst <- Rpackages %in% installed.packages()
+if (length(Rpackages[!inst]) > 0) {
+  install.packages(Rpackages[!inst], dep = TRUE, repos = "https://cloud.r-project.org")
 }
-lapply(RRpackages, library, character.only = TRUE)
+lapply(Rpackages, library, character.only = TRUE)
 
 devtools::install_github("EmilyMarkowitz-NOAA/NMFSReports")
 library(NMFSReports)