У меня есть сюжет в Shiny UI. Если я изменю какой-либо входной параметр и через реактивный график изменится Но давайте рассмотрим следующую ситуацию: - График на графике Shiny UI, скажем, внутри-дневное движение цены акции. И для этого вы запрашиваете некоторый живой источник данных. Теперь, если я создаю кнопку обновления, а затем, если время проходит, я продолжаю нажимать на кнопку обновления. График будет обновляться по мере поступления новых данных с течением времени в этот источник данных в реальном времени. Теперь мой вопрос: я не хочу продолжать нажимать кнопку обновления. Но я хочу запустить цикл с таймером, чтобы он проверял фиксированный интервал времени и как только появлялись новые данные, график автоматически обновлялся. Что-то вроде графиков Google Finance, которые постоянно обновляются.

Таким образом, проблему можно упростить следующим образом: - Давайте рассмотрим этот пример из самого Shiny: - ui.R

library(shiny)    

shinyUI(pageWithSidebar(    

  headerPanel("Hello Shiny!"),

  sidebarPanel(
    sliderInput("obs", 
                "Number of observations:", 
                min = 1,
                max = 1000, 
                value = 500)
  ),

  mainPanel(
    plotOutput("distPlot")
  )
))

и сервер.R

library(shiny)

shinyServer(function(input, output) {

  output$distPlot <- renderPlot({

    # generate an rnorm distribution and plot it
    dist <- rnorm(input$obs)
    hist(dist)
  })

})

Теперь я хочу создать случайную выборку из обычного распределения без какой-либо входной активности. Так что в основном я хочу позвонить

dist <- rnorm(input$obs)
hist(dist)

снова без изменения sliderInput. Пожалуйста, помогите мне узнать, как это сделать.