Atualizar gráfico / plotagem com intervalo de tempo fixo
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.