From c982c7132386454b3611371a29c4593b3c4a01cc Mon Sep 17 00:00:00 2001 From: Suoqin Jin <32399212+sqjin@users.noreply.github.com> Date: Thu, 22 Sep 2022 08:10:34 +0800 Subject: [PATCH] Fix a bug in netVisual_diffInteraction --- R/visualization.R | 1 + 1 file changed, 1 insertion(+) diff --git a/R/visualization.R b/R/visualization.R index db3b615..7a73a79 100644 --- a/R/visualization.R +++ b/R/visualization.R @@ -1389,6 +1389,7 @@ netVisual_diffInteraction <- function(object, comparison = c(1,2), measure = c(" df.net$target <- factor(df.net$target, levels = cells.level) df.net$value[is.na(df.net$value)] <- 0 net <- tapply(df.net[["value"]], list(df.net[["source"]], df.net[["target"]]), sum) + net[is.na(net)] <- 0 } if (remove.isolate) {