最近打好一串程式是能够读取到某资料夹的内容能够显示出来
（（以下是能够自己读档的方式
setwd("C:/home/user521/桌面/0519/545")
getwd()
list.files() # dir()
(filenames <- list.files(".", pattern="*.csv"))
(quiz.data <- lapply(filenames, read.table))
但现在想更进一步就是利用shiny方式 然后按按键之后就能够让档案自动读取
想请问该如何更改
以下是Server端
shinyServer(function(input, output) {
output$plot1 <- renderPlot({
# Simply accessing input$goButton here makes this reactive
# object take a dependency on it. That means when
# input$goButton changes, this code will re-execute.
input$goButton
# Use isolate() to avoid dependency on input$n
isolate({
hist(rnorm(input$n))
})
})
})
想问是不是要从input$goButton 这边下去做更改 还是render方面该如何做修改
我们想让按钮按下去程式才会运作 而不是程式直接运作