diff --git a/R/assay.R b/R/assay.R index c96de65f..67a75cf4 100644 --- a/R/assay.R +++ b/R/assay.R @@ -697,6 +697,11 @@ Layers.Assay <- function(object, search = NA, ...) { if (!is_na(x = search)) { layers <- intersect(x = search, y = layers) if (length(x = layers) == 0) { + warning( + "Layer ", search, " isn't present in the assay ", deparse(substitute(object)), ". Returning NULL.", + call. = FALSE, + immediate. = TRUE + ) return(NULL) } }