From 756de4e20fc88460c89ee0d59ce122b9330a2e1a Mon Sep 17 00:00:00 2001 From: ammichalowski Date: Thu, 8 Dec 2022 11:40:55 -0800 Subject: [PATCH] fix NAMESPACE @importFrom methods empty --- R/Sample_Names.R | 2 +- tests/testthat/test-Metadata_Table.R | 1 - tests/testthat/test-Name_Clusters_by_Enriched_Cell_Type.R | 2 -- 3 files changed, 1 insertion(+), 4 deletions(-) diff --git a/R/Sample_Names.R b/R/Sample_Names.R index c098c27..9e0ce6c 100644 --- a/R/Sample_Names.R +++ b/R/Sample_Names.R @@ -5,7 +5,7 @@ #' @param SO Seurat-class object #' #' @importFrom methods slotNames -#'#' +#' #' #' @export #' @return A table (data.frame) with the number of cells per each sample name (column names) diff --git a/tests/testthat/test-Metadata_Table.R b/tests/testthat/test-Metadata_Table.R index ca3d04f..151b71e 100644 --- a/tests/testthat/test-Metadata_Table.R +++ b/tests/testthat/test-Metadata_Table.R @@ -1,7 +1,6 @@ # load data seurat.object <-readRDS(test_path("fixtures", "SO_moduleScore.rds")) - # run tests test_that("reductions are returned", { diff --git a/tests/testthat/test-Name_Clusters_by_Enriched_Cell_Type.R b/tests/testthat/test-Name_Clusters_by_Enriched_Cell_Type.R index 0cd5edc..9074216 100644 --- a/tests/testthat/test-Name_Clusters_by_Enriched_Cell_Type.R +++ b/tests/testthat/test-Name_Clusters_by_Enriched_Cell_Type.R @@ -1,8 +1,6 @@ # load data seurat.object <- readRDS(test_path("fixtures", "SO_moduleScore.rds")) - metadata <- read.csv(test_path("fixtures", "Cell_Metadata.csv")) - identities_match <- read.csv(test_path("fixtures", "ClusterNames_match.csv")) identities_diff <- read.csv(test_path("fixtures", "ClusterNames_diff.csv")) identities_oneMore <- read.csv(test_path("fixtures", "ClusterNames_oneMore.csv"))