Skip to content

Commit

Permalink
Merge pull request #772 from Ashastry2/devel
Browse files Browse the repository at this point in the history
Fixes remaining NAMESPACE errors
  • Loading branch information
joshua-d-campbell authored Oct 28, 2024
2 parents e4051af + 0d1d468 commit 6557272
Show file tree
Hide file tree
Showing 2 changed files with 7 additions and 1 deletion.
1 change: 1 addition & 0 deletions NAMESPACE
Original file line number Diff line number Diff line change
Expand Up @@ -273,6 +273,7 @@ import(eds)
importFrom(BiocParallel,SerialParam)
importFrom(ComplexHeatmap,anno_barplot)
importFrom(S4Vectors,"metadata<-")
importFrom(S4Vectors,DataFrame)
importFrom(S4Vectors,metadata)
importFrom(SingleCellExperiment,"counts<-")
importFrom(SingleCellExperiment,"reducedDim<-")
Expand Down
7 changes: 6 additions & 1 deletion R/plotSCEHeatmap.R
Original file line number Diff line number Diff line change
Expand Up @@ -113,6 +113,8 @@
#' @importFrom grid gpar
#' @importFrom ComplexHeatmap anno_barplot
#' @importFrom rlang .data
#' @importFrom S4Vectors DataFrame
#'
#'
plotSCEHeatmap <- function(inSCE, useAssay = 'logcounts', useReducedDim = NULL,
doLog = FALSE, featureIndex = NULL, cellIndex = NULL,
Expand Down Expand Up @@ -288,7 +290,7 @@ plotSCEHeatmap <- function(inSCE, useAssay = 'logcounts', useReducedDim = NULL,
#colData(SCE) <- colData(SCE)[,c(aggregateCol),drop=FALSE] ##change

temp_df<-as.data.frame(colData(SCE)[,c(aggregateCol),drop=FALSE]) %>%
unite("new_colnames",1:ncol(.),sep = "_",remove = FALSE) %>%
unite("new_colnames",1:ncol(.data),sep = "_",remove = FALSE) %>%
remove_rownames() %>%
# mutate(aggregated_column = new_colnames) %>%
# dplyr::select(new_colnames, aggregated_column) %>%
Expand Down Expand Up @@ -380,6 +382,9 @@ plotSCEHeatmap <- function(inSCE, useAssay = 'logcounts', useReducedDim = NULL,
stop('Breaks of `colorScheme` do not match with `trim`.')
}

# Avoid documentation error by setting these values to NULL
# removed NOTE about namespaces.
n<-value<-NULL

### Generate HeatmapAnnotation object
ca <- NULL
Expand Down

0 comments on commit 6557272

Please sign in to comment.