如何删除范围滑块中显示的图形？

Question

我正在开发 R Shiny 仪表板并使用范围滑块，但我不喜欢滑块中重复显示的图表 - 如何删除它？

我刚刚从 plotly 信息页面发送了链接以显示我的意思：

我创造了这个：

xaxis_plots[["rangeslider"]] <- list(range="week_ending", visible = TRUE, thickness = 0.05, bgcolor = "#ECEBF3")

但是，当我将它添加到 plotly 代码中时，它仍然显示里面的图表。

Answer 1

这里有一个方法。我们绘制系列的两倍。一个是无形的，我们为这个系列添加了范围滑块。然后我们在第二个 x 轴上绘制第二个系列。

library(plotly)

plot_ly() %>%
  add_lines(x = time(USAccDeaths), y = USAccDeaths, xaxis = "x2") %>%
  add_lines(x = time(USAccDeaths), y = USAccDeaths, visible = FALSE) %>%
  layout(
      xaxis = list(rangeslider = list(visible = TRUE)),
      xaxis2 = list(matches = "x", overlaying = "x")
  )