inst/build-test/test-package.R

In zhuob/R4ClinicalTrial: R tools for clinical trials

remove.packages("r4ct", lib="~/R/win-library/4.1")

path_to_pkg <- dirname(getwd())
pkg_name_version <- list.files(path_to_pkg, pattern = "r4ct")
local_pkg <- paste(path_to_pkg, tail(pkg_name_version, 1), sep = "/")

devtools::install_local(local_pkg, dependencies = TRUE, upgrade = "never")
# devtools::install_github("zhuob/R4ClinicalTrial")
# r4ct::launch_app(appname = "myapp1")
# r4ct::launch_app(appname = "mTPI2")
# r4ct::launch_app(appname = "reconstruct-survival-data")
# r4ct::launch_app(appname = "bayes-go-nogo")
# View(r4ct::click_data)
# 
# library(tidyverse)
S