redocs

R/utils_nflverse_data_class.R

@@ -5,6 +5,7 @@
 #' `data.frame` class.
 #'
 #' @name nflverse_data-class
+#' @keywords internal
 #' @exportClass nflverse_data
 methods::setOldClass(c("nflverse_data", "data.frame"))
 

R/utils_sitrep.R

@@ -83,7 +83,7 @@ ffverse_sitrep <- function(pkg = c("ffscrapr","ffsimulator","ffpros","ffopportun
 
   out$installed <- lapply(s$otherPkgs, `[`, c("Package", "Version"))
   out$installed <- as.data.frame(data.table::rbindlist(out$installed))
-  out$installed <- setNames(out$installed, c("package","version"))
+  out$installed <- stats::setNames(out$installed, c("package","version"))
 
   # Relies on options for a given package being prefixed by said package name
   opts <- options()
@@ -113,8 +113,8 @@ ffverse_sitrep <- function(pkg = c("ffscrapr","ffsimulator","ffpros","ffopportun
 #' Re-exporting with `methods::setOldClass()` allows these dataframes to be used
 #' in S4 generics like those from DBI and jsonlite.
 #'
-#' @name nflverse_sitrep-data-class
-#'
+#' @name nflverse_sitrep-class
+#' @keywords internal
 #' @exportClass nflverse_sitrep
 methods::setOldClass("nflverse_sitrep", "list")
 
@@ -148,7 +148,7 @@ print.nflverse_sitrep <- function(x, ...) {
 .sitrep_deps_pak <- function(packages){
   ref <- NULL
   pkg_status <- data.table::as.data.table(pak::pkg_status(packages))
-  pkg_status <- data.table:::unique.data.table(pkg_status, by = "package")
+  pkg_status <- unique(pkg_status, by = "package")
   pkg_spec <- data.table::fcoalesce(pkg_status$remotepkgref, pkg_status$package)
 
   # Add any repositories found by pkg_status to the search list
@@ -201,7 +201,7 @@ print.nflverse_sitrep <- function(x, ...) {
 
   dep_status <- utils::sessionInfo(deps)$otherPkgs
   dep_status <- data.table::rbindlist(dep_status, fill = TRUE)[, c("Package", "Version")]
-  dep_status <- setNames(dep_status, c("package","version"))
+  dep_status <- stats::setNames(dep_status, c("package","version"))
   dep_status <- as.data.frame(dep_status)
 
   return(dep_status)