From 1543117ca0b7dbc294e5f6ee9d90b293165ac1f3 Mon Sep 17 00:00:00 2001 From: Raoul Wadhwa Date: Sat, 4 Aug 2018 18:54:11 -0400 Subject: [PATCH] Added 1:1 coordinate ratio for persistence diagrams. This fixes issue #2. --- R/visuals.R | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/R/visuals.R b/R/visuals.R index 1cd632f..72ca881 100644 --- a/R/visuals.R +++ b/R/visuals.R @@ -59,7 +59,8 @@ plot_persist <- function(feature.matrix) { ggplot2::theme(axis.line = ggplot2::element_line(colour = "black"), # add axis lines panel.grid.major = ggplot2::element_blank(), panel.grid.minor = ggplot2::element_blank(), # remove gridlines panel.background = ggplot2::element_blank()) + # remove default background color - ggplot2::geom_point(ggplot2::aes_string(x = "birth", y = "death", shape = "dimension", colour = "dimension")) # add features as points + ggplot2::geom_point(ggplot2::aes_string(x = "birth", y = "death", shape = "dimension", colour = "dimension")) + # add features as points + ggplot2::coord_fixed(ratio = 1) } #####TOPOLOGICAL BARCODE#####