R语言中shiny如何接收输入的文件并读取文件内的数据

Shiny可以使用输入控件来接收文件，包括文件选择器（fileInput）和拖放文件（drag and drop）。使用文件选择器后，可以使用R内置的函数如read.csv()、read.table()来读取文件内的数据。例如，可以使用以下代码来读取一个名为“file1.csv”的文件：

server <- function(input, output) {
  data <- reactive({
    inFile <- input$file1
    if (is.null(inFile)) {
      return(NULL)
    }
    read.csv(inFile$datapath, header = TRUE)
  })
  
  output$table <- renderTable({
    data()
  })
}