ggparcoord(splineFactor = TRUE) now displays breaks (#279)

* splineFactor = TRUE now uses a continuous scale * added news
ggobi · May 17, 2018 · e7167eb · e7167eb
1 parent 1d30777
commit e7167eb
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 1 deletion.
diff --git a/NEWS.md b/NEWS.md
@@ -29,6 +29,10 @@ GGally 1.3.3
 
 * Added `sort` parameter to sort by beta values (#273)
 
+`ggparcoord`
+
+* Fixed bug where x axis breaks and labels did not appear when `splineFactor = TRUE` (#279)
+
 
 
 GGally 1.3.2

diff --git a/R/ggparcoord.R b/R/ggparcoord.R
@@ -569,7 +569,11 @@ ggparcoord <- function(
 
     xAxisLabels <- levels(data.m$variable)
     # while continuous data, this makes it present like it's discrete
-    p <- p + scale_x_discrete(breaks = seq_along(xAxisLabels), labels = xAxisLabels)
+    p <- p + scale_x_continuous(
+      breaks = seq_along(xAxisLabels),
+      labels = xAxisLabels,
+      minor_breaks = FALSE
+    )
 
   } else {
     if (alphaLinesIsCharacter) {