Add verbose

mhurtado13 · mhurtado13 · commit 6e3b7f89261e · 2025-11-11T16:11:40.000+01:00
diff --git a/R/cell_deconvolution.R b/R/cell_deconvolution.R
@@ -1135,7 +1135,9 @@ compute.deconvolution.analysis <- function(deconvolution, corr = 0.7, corr_type
     grDevices::dev.off()
   }
 
-  message("Deconvolution features subgroupped")
+  if(verbose){
+    message("Deconvolution features subgroupped")
+  }
 
   results = list(dt, res, groups, groups_discard, zero_features, low_variance_features, cells_discarded, features_high_corr)
   names(results) = c("Deconvolution matrix", "Deconvolution subgroups per cell types", "Deconvolution subgroups composition",

Original file line number	Diff line number	Diff line change
`@@ -1135,7 +1135,9 @@ compute.deconvolution.analysis <- function(deconvolution, corr = 0.7, corr_type`
`1135`	`1135`	`grDevices::dev.off()`
`1136`	`1136`	`}`
`1137`	`1137`
`1138`		`- message("Deconvolution features subgroupped")`
	`1138`	`+ if(verbose){`
	`1139`	`+ message("Deconvolution features subgroupped")`
	`1140`	`+ }`
`1139`	`1141`
`1140`	`1142`	`results = list(dt, res, groups, groups_discard, zero_features, low_variance_features, cells_discarded, features_high_corr)`
`1141`	`1143`	`names(results) = c("Deconvolution matrix", "Deconvolution subgroups per cell types", "Deconvolution subgroups composition",`