rshinyの最初のボタンを押したときにのみ機能を実行します

Question

私の光り輝くアプリでは、ラジオボタンの値を変更した後にしか実行しないようにしたいのですが、これが初めてです。価値の最初の変化に反応させる方法はありますか？あなた以下

Answer 1

はobserveEventが、私はあなたが行くと、公式サイトEvent handler上の関数定義を見て持っていることを助言するなどignoreInitとonceとして引数を持っていることがわかります。私はまたライブラリをdisableという関数で追加しました。ここでは便利だと思います。

rm(list=ls()) 
library(shiny) 
library(shinyjs) 

ui <- fluidPage(
    useShinyjs(), 
    radioButtons("nums", "Will Execute only Once",c("1000" = 1000,"10000" = 10000), selected = 0), 
    plotOutput("Plot") 
) 

server <- function(input, output) { 
    v <- reactiveValues() 
    observeEvent(input$nums, { 
    v$data <- rnorm(input$nums) 
    },ignoreInit = TRUE, once = TRUE) 

    output$Plot <- renderPlot({ 
    if(is.null(v$data)){ 
     return() 
    } 
    disable('nums') 
    hist(v$data) 
    box() 
    }) 
} 

shinyApp(ui, server)