Eu tenho um enredo na interface do usuário brilhante. Se eu alterar qualquer parâmetro de entrada e através da reatividade, o gráfico mudará. Mas vamos considerar a seguinte situação: - O enredo na plotagem de interface do usuário brilhante permite dizer o movimento de preço intra-dia de um estoque. E para isso você consulta alguma fonte de dados ao vivo. Agora, se eu criar um botão de atualização e, em seguida, se o tempo passar, continuo clicando no botão Atualizar. O gráfico será atualizado à medida que novos dados chegam à medida que o tempo passa nessa fonte de dados em tempo real. Agora a minha pergunta é que eu não quero continuar clicando no botão de atualização. Mas eu quero executar um loop com temporizador para que ele seja verificado em um intervalo fixo de tempo e assim que novos dados chegarem, o gráfico será atualizado automaticamente. Algo como o Google Finance Graphs, que continua atualizando ao longo do tempo.

Então o problema pode ser simplificado da seguinte maneira: - Vamos considerar este exemplo do próprio 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")
  )
))

e server.R

library(shiny)

shinyServer(function(input, output) {

  output$distPlot <- renderPlot({

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

})

Agora quero gerar uma amostra aleatória diferente da distribuição normal sem nenhuma atividade de entrada. Então basicamente eu quero ligar

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

novamente sem alterar sliderInput. Por favor me ajude a descobrir como fazer isso.