Update featuremap_plot_table_gene_map.R

bigomics · Oct 14, 2024 · 2c1e770 · 2c1e770
1 parent a25bc55
commit 2c1e770
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/components/board.featuremap/R/featuremap_plot_table_gene_map.R b/components/board.featuremap/R/featuremap_plot_table_gene_map.R
@@ -210,7 +210,7 @@ featuremap_plot_gene_map_server <- function(id,
       if (mean(df$feature %in% df$symbol, na.rm = TRUE) > 0.9) {
         df$feature <- NULL
       }
-      if (mean(df$symbol == df$human_ortholog, na.rm = TRUE) > 0.9 | all(is.na(df$human_ortholog))) {
+      if (mean(df$symbol == df$human_ortholog, na.rm = TRUE) > 0.9 || all(is.na(df$human_ortholog))) {
         df$human_ortholog <- NULL
       }