show_matrixplotly uses automargin = T to show complete x-axis text

tbep-tech · Aug 12, 2024 · 3cd5fad · 3cd5fad
1 parent 51565e6
commit 3cd5fad
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/R/show_matrixplotly.R b/R/show_matrixplotly.R
@@ -38,12 +38,15 @@ show_matrixplotly <- function(mat, family = NA, tooltip = 'Result', width = NULL
     tickfont = list(size=14),
     overlaying = "x",
     nticks = length(collev),
-    side = "top"
+    side = "top",
+    automargin = T
   )
 
   out <- plotly::ggplotly(plo, tooltip = tooltip, width = width, height = height) %>%
     plotly::add_bars(x = collev,y = seq(1, length(collev)), xaxis = 'x2', inherit = F, showlegend = F) %>%
-    plotly::layout(xaxis2 = ax)
+    plotly::layout(
+      xaxis2 = ax
+      )
 
   # plotly output
   out <- out %>%