extras/PackageMaintenance.R

In OHDSI/Achilles: Achilles Data Source Characterization

# @file PackageMaintenance
#
# Copyright 2023 Observational Health Data Sciences and Informatics
#
# This file is part of Achilles
# 
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
# 
#     http://www.apache.org/licenses/LICENSE-2.0
# 
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.

# Manually delete package from library. Avoids "Already in use" message when rebuilding
unloadNamespace("Achilles")
.rs.restartR()
folder <- system.file(package = "Achilles")
folder
unlink(folder, recursive = TRUE, force = TRUE)
file.exists(folder)

# Format and check code --------------------------------------------------------
OhdsiRTools::formatRFolder()
OhdsiRTools::checkUsagePackage("Achilles")
OhdsiRTools::updateCopyrightYearFolder()
devtools::spell_check()

devtools::check()
# devtools::check(document = FALSE, args=c("--no-tests"))
# codetools::checkUsagePackage("Achilles")

# Regenerate manual, vignette PDFs, and website --------------------------------
unlink("extras/Achilles.pdf")
shell("R CMD Rd2pdf ./ --output=extras/Achilles.pdf")

dir.create("inst/doc")
rmarkdown::render("vignettes/RunningAchilles.Rmd",
  output_file = "../inst/doc/RunningAchilles.pdf",
  rmarkdown::pdf_document(latex_engine = "pdflatex",
  toc = TRUE, number_sections = TRUE)
)
rmarkdown::render("vignettes/GettingStarted.Rmd",
  output_file = "../inst/doc/GettingStarted.pdf",
  rmarkdown::pdf_document(latex_engine = "pdflatex",
  toc = TRUE, number_sections = TRUE)
)

devtools::document()
pkgdown::build_site()
OhdsiRTools::fixHadesLogo() # Required to fix the HADES logo in the website header

# Release package to CRAN ------------------------------------------------------
devtools::check_win_devel()

devtools::check_rhub()

devtools::release()

devtools::check(cran=TRUE)