Как изменить цвет фона графика, созданного блестящим приложением?

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)

ОжидаемыйРезультатом будет изменение цвета фона всего графика после того, как пользователь вручную выберет шестнадцатеричное значение из цветовой палитры.