我想要做的是一个 Shiny 的应用程序,它显示文件夹中的文件,并允许用户点击它打开/下载。假设我在一个文件夹中有 3 个文件,例如:
file1.txt file2.bmp file3.jpg
我想要的是我的应用程序向我显示这些文件并让我单击它们以下载/打开。如果它只有 html,它就像
<a href="file1.txt">file1</a><a href="file2.bmp">file2</a><a href="file3.jpg">file3</a>
这必须动态完成,所以当我单击一个按钮时,它会刷新文件夹中的文件列表并让我下载它们。
谢谢!
最佳答案
这是一个浏览文件、打开文件并显示其内容的简单程序。
library(shiny)
# Define UI
ui <- pageWithSidebar(
# App title ----
headerPanel("Open a File and Show Contents"),
# Sidebar panel for inputs ----
sidebarPanel(
label="Data Source",fileInput("fileName", "File Name")),
# Main panel for displaying outputs ----
mainPanel(
textOutput(outputId = "text"))
)
# Define server logic
server <- function(input, output) {
inputData <- reactive ({
if (is.null(input$fileName)) return(NULL)
inFile <- input$fileName
conInFile <- file(inFile$datapath,open='read')
inData <- readLines(conInFile)
close (conInFile)
return (inData)
})
output$text <- renderText ({
inData <- inputData()
inData
})
}
shinyApp(ui, server)
关于javascript - 使用 Shiny 链接文件夹中的文件,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/58050939/