Typo

iflint1 · Mar 26, 2024 · a3c6059 · a3c6059
1 parent d3226db
commit a3c6059
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/chord_diagram.R b/R/chord_diagram.R
@@ -101,7 +101,7 @@ chord_diagram_plot <- function(fit,
   identification <- identification[identification %in% colnames(chord_diagram)]
 
   # Remove NAs
-  chord_diagram <- chord_diagram[!is.na(df[, identification]), ]
+  chord_diagram <- chord_diagram[!is.na(chord_diagram[, identification]), ]
 
   if(nrow(chord_diagram) == 0) {
     warning("There were no interactions to plot. This could be due to all interactions being non-statistically significant, with option only_statistically_significant active.")