global.Rでグローバル変数Rを使用する方法Shiny

Question

ui.R、server.R、global.Rがあります。

datasetを選択してactionButtonを押すと、反応性グローバル変数を使用します。

例：

ui.R

fluidPage(
    titlePanel("Using global variable"), 
    fluidRow(
     uiOutput("ui1"), 
     uiOutput("ui2"), 
     uiOutput("ui3") 
    ), 
) 
) 

server.R

function(input, output) { 

    output$ui1 <- renderUI({ 
    selectInput("dataset", "firstValue", choices = c("first", "second", "third") 
    }) 

    output$ui2 <- renderUI({ 
     actionButton("doIt", class="btn-primary", "change") 
    }) 

    output$ui3 <- renderText({ 
     paste(catPath) 
    }) 
} 

global.R

catPath <<- paste(output$dataset, "/completed", sep="") 

をdatasetに選択すると、first/completedがui3 renderTextになります。 actionButtonを押します。

どうすればこのプロセスを完了できますか？

Answer 1

私は@JohnPaulと@ Lee88に同意し、catPathはおそらくserver.Rに属しています。それを言いましたが、私は今ここでそれを保つつもりです（あなたがMWEでこれについて他の理由があると仮定して）。

global.Rは：

catPath <- "" 

（何もアクションが取られていない場合は、それが返されますが）私は、そうでない場合は、ここで使用される値は無意味である必要があり、後で参照できるようにするために何かにそれを設定するために必要な。

ui.R：

私が "停止？" を追加あなたのアプリケーションを「終了」し、catPathの値を呼び出し環境に取り込むことができるようにします。意図的にアプリを終了させたくない場合は必要ありません。

fluidPage(
    titlePanel("Using global variable"), 
    fluidRow(
    uiOutput("ui1"), 
    uiOutput("ui2"), 
    uiOutput("ui3"), 
    actionButton("stopme", "Stop?") 
) 
) 

server.R：

私は（計算を実行しない）HTMLオブジェクトを作成するためにoutput$ui3を変更し、それらの2つのイベントや行動を観察します。もう一度、あなたは "停止する必要はありませんか？"上記のボタンを2回押す必要はありません。 （あなたがそれを使用する場合、stopAppへの引数は目に見えない呼び出し元に返されることに注意してください。）

function(input, output, session) { 
    output$ui1 <- renderUI({ 
    selectInput("dataset", "firstValue", choices = c("first", "second", "third")) 
    }) 
    output$ui2 <- renderUI({ 
    actionButton("doIt", class="btn-primary", "change") 
    }) 
    output$ui3 <- renderUI({ 
    textInput("myinput", "catPath", "") 
    }) 
    observeEvent(input$doIt, { 
    catPath <<- paste(input$dataset, "/completed", sep = "") 
    updateTextInput(session, inputId = "myinput", value = catPath) 
    }) 
    observeEvent(input$stopme, { stopApp(catPath); }) 
} 

はnewCatPath <- runApp("path/to/dir")のようなものをやって。