# library(rstudioapi)
# 
# script_path <- rstudioapi::getActiveDocumentContext()$path
# print(script_path)
# working_directory <- dirname(dirname(script_path))
# setwd(working_directory)


# pkgdown::build_site()
#
# devtools::document()
# devtools::build()
# devtools::check(manual = TRUE)
#
# devtools::spell_check()
#
# devtools::check_rhub()
#
# devtools::check_win_devel()
#
# NEWS.md
# DESCRIPTION
# cran-comments.md
#
# devtools::release()
#
# pack <- available.packages()
#
# which(rownames(pack) == "Qval")
#
#
#
# library(cranlogs)
# downloads <- cran_downloads(packages = "Qval", from = "2024-02-04", to = "2024-09-18")
# print(downloads)
# sum(downloads$count)