相关疑难解决方法(0)

我创建了一个闪亮的仪表板，其中有许多选项卡，每个选项卡都并排设置了一些绘图图表。因为它们是并排的，所以如果不放大浏览器以使图表填满页面，就很难详细查看单个图表（即使如此，由于某种原因，图表在放大时会上下摆动）。

我想在 Plotly 中肯定有一种方法可以创建一个按钮来创建一个可以全屏显示的图表弹出窗口？然而，我在谷歌上搜索过，找不到任何与情节相关的内容。

我确实找到了这个...... 闪亮：弹出窗口中的绘图结果

这种弹出窗口就足够了。但在本例中，图表仅在弹出窗口本身上创建（并且是图像而不是交互式绘图）。在这种情况下，我想做的是镜像主页上的图表，但我知道您从 UI 的两个不同部分调用相同的输出在 Shiny 中不起作用。

有谁对如何解决这个问题有任何想法？

这是我使用plotly_click事件的基本闪亮应用程序的代码,可选择显示另一个图.我希望那个侧框图在模式弹出窗口中呈现,而不是在页面内侧面.

library(shiny)
library(plotly)

df1 <- data.frame(x = 1:10, y = 1:10)
df2 <- data.frame(x = c(rep('a', 10), rep('b', 10)),
                  y = c(rnorm(10), rnorm(10, 3, 1)))

ui <- fluidPage(
  column(6, plotlyOutput('scatter')),
  column(6, plotlyOutput('box'))
)

server <- function(input, output) {
  output$scatter <- renderPlotly({
    plot_ly(df1, x = x, y = y, mode = 'markers', source = 'scatter')
  })

  output$box <- renderPlotly({
    eventdata <- event_data('plotly_click', source = 'scatter')
    validate(need(!is.null(eventdata),
                  'Hover over the scatter plot to populate this boxplot'))


    plot_ly(df2, x = x, …