fix: "file: " in matrix plot caption when comparing 2 matrices

js2264 · Jan 10, 2024 · 7c81754 · 7c81754
1 parent 125bd1d
commit 7c81754
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/R/plotting.R b/R/plotting.R
@@ -143,10 +143,15 @@ setMethod("plotMatrix", "HiCExperiment", function(
         )
     }
     if (caption & is.null(tracks)) {
+        f <- fileName(x)
+        if (!is.null(compare.to)) {
+            f <- paste0(fileName(x), ' | ', fileName(compare.to))
+            print(f)
+        }
         p <- p + ggplot2::labs(
             caption = paste(
                 sep = '\n',
-                paste0('file: ', fileName(x)), 
+                paste0('file: ', f), 
                 paste0('resolution: ', resolution(x)), 
                 paste0('focus: ', focus(x)),
                 paste0('scores: ', use.scores),