From ebbaf381d14b133f4faf65bed310e1693dad6bcd Mon Sep 17 00:00:00 2001
From: pvictor <perrier.victor@gmail.com>
Date: Tue, 9 Jun 2020 17:02:39 +0200
Subject: [PATCH] spark axis: be sure axis is hidden

---
 R/spark-box.R | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/R/spark-box.R b/R/spark-box.R
index 8b28944..0dd7507 100644
--- a/R/spark-box.R
+++ b/R/spark-box.R
@@ -27,8 +27,11 @@
 #' @importFrom ggplot2 aes
 #'
 #' @example examples/spark_box.R
-spark_box <- function(data, title = NULL, subtitle = NULL, 
-                      color = "#2E93fA", background = "#FFF",
+spark_box <- function(data, 
+                      title = NULL,
+                      subtitle = NULL, 
+                      color = "#2E93fA", 
+                      background = "#FFF",
                       type = c("area", "line", "spline", "column"),
                       synchronize = NULL,
                       title_style = NULL, 
@@ -53,6 +56,7 @@ spark_box <- function(data, title = NULL, subtitle = NULL,
     sparkline = list(enabled = TRUE),
     group = synchronize
   )
+  spark <- ax_yaxis(spark, show = FALSE)
   spark <- ax_colors(spark, color)
   if (!is.null(title)) {
     if (is.null(title_style))