From a44dc3409d57636bcb4d04995aa0822ee706c55d Mon Sep 17 00:00:00 2001
From: Weber Kang <76481801+WeberKang@users.noreply.github.com>
Date: Sun, 24 Dec 2023 15:55:38 +0800
Subject: [PATCH] Update plot_cpdb3.R

factor to character
---
 R/plot_cpdb3.R | 1 +
 1 file changed, 1 insertion(+)

diff --git a/R/plot_cpdb3.R b/R/plot_cpdb3.R
index 3bd0f66..d997df2 100644
--- a/R/plot_cpdb3.R
+++ b/R/plot_cpdb3.R
@@ -50,6 +50,7 @@ plot_cpdb3 <- function(
     )
     requireNamespace("SummarizedExperiment")
     requireNamespace("SingleCellExperiment")
+    lr_interactions[, 3] <- as.character(lr_interactions[, 3])
     if (is.null(splitby_key)) {
         if (any(lr_interactions[, 3] > 0)) {
             if (any(is.na(lr_interactions[, 3]))) {