R Shiny用按鈕創建幾個隨機數並保存它

我想創建一個按鈕，它會生成一個隨機數並將所有隨機數保存在我的服務器上，以便以後可以評估該數據。R Shiny用按鈕創建幾個隨機數並保存它

不幸的是，我無法生成所有隨機數的向量。不知何故，for循環無法正常工作。謝謝！

library(shiny) 

ui <- fluidPage(
    actionButton("button", "Show") 
) 

server <- function(input,output) { 
    eventReactive(input$button, { 
    counter <- sample(1:10,1) 
    }) 
} 
shinyApp(server = server, ui = ui)

來源

2017-08-11 Vit

凡工作不'for'環是什麼？你真的需要一個循環？ – Geovany

我想出了使用循環，但有錯誤的。目前我不知道如何解決這個問題...... – Vit

你不需要在R A for循環產生隨機數的向量，也有隨機數生成的功能很多，請了一些例子檢查here。

這裏是一個示例代碼：

library(shiny) 

ui <- shinyUI(fluidPage(
    titlePanel("Random number generator"), 
    sidebarLayout(
    sidebarPanel( 
     sliderInput("rangeSl", "Range", min = 0, 
     max = 100, value = c(40, 60) 
    ), 
     numericInput("num", "Quantity:", 20, min = 1, max = 100, width = "40%"), 
     actionButton("generateBt", "Generate Numbers") 
    ), 
    mainPanel( 
     verbatimTextOutput("result") 
    ) 
) 
)) 

server <- shinyServer(function(input, output) { 
    output$result <- renderPrint({ 
    if (input$generateBt > 0) 
     isolate(
     floor(runif(input$num, min = input$rangeSl[1], max = input$rangeSl[2])) 
    ) 
    }) 
}) 

shinyApp(ui = ui, server = server)

來源

2017-08-13 04:44:04 Geovany

R Shiny用按鈕創建幾個隨機數並保存它

回答

相關問題