如何更改由闪亮的应用程序生成的绘图的背景颜色？

Question

我正在构建一个闪亮的应用程序，该应用程序可以在按下按钮后生成绘图，我希望用户能够手动更改生成的绘图的背景，但是在绘图后我似乎无法改变颜色是第一次创建。

我正在使用RStudio 1.1.45和Shiny 1.2

以下是我认为可行的示例：

library(shiny)
ui <- shinyUI(
    fluidPage(
        titlePanel('Changing Plot background color in shiny'),
        sidebarLayout(
            sidebarPanel(
                colourInput('background.color','Select Background Color','white'),
                tags$hr(),
                actionButton("goButton", "Go!")
            ),
        mainPanel(
            plotOutput("plot",width = "500px", height="500px") ))))

server <- shinyServer(function(input, output, session) {
    isolate({
        input$goButton
        bg.col = input$background.color
        output$plot <- renderPlot({
            plot(sample(1:10,10))
            },
            res = 72, bg = bg.col)
  })
})
shinyApp(ui = ui, server = server)

在用户从调色板中手动选择一个十六进制值后，预期结果将是整个图的背景色发生变化。