library(testthat) library(rigakuXRD) library(dplyr) test_check("rigakuXRD") # usethis::use_test("findPeak") # find dependencies # tools::package_dependencies("rigakuXRD", db = installed.packages())