Merge pull request #20 from VEuPathDB/export-findNumericCols

export findNumericCols
VEuPathDB · Sep 21, 2023 · defa36e · defa36e
2 parents 3531e79 + 8c5c3b5
commit defa36e
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 0 deletions.
diff --git a/NAMESPACE b/NAMESPACE
@@ -36,6 +36,7 @@ export(findCollectionVariableMetadata)
 export(findDataShapesFromPlotRef)
 export(findDataTypesFromPlotRef)
 export(findIndexFromPlotRef)
+export(findNumericCols)
 export(findStudyDependentVocabularyVariableMetadata)
 export(findVariableMetadataFromEntityId)
 export(findVariableMetadataFromPlotRef)

diff --git a/R/utils-numeric.R b/R/utils-numeric.R
@@ -182,6 +182,7 @@ naToZero.default <- function(x) {
 #' @param x list, data.frame, array, or vector
 #' @return vector of numeric column names in x. If no numeric columns found, returns NULL
 #' @importFrom purrr map_lgl
+#' @export
 findNumericCols <- function(x) {
   numericCols <- names(x)[purrr::map_lgl(x, is.numeric)]