У меня слишком большая таблица, хранящаяся в выпадающем списке по этой ссылке https://www.dropbox.com/s/k94brqtrp5thch3/005.txt?dl=0; Мне нужно получить доступ к этой таблице таким образом, чтобы в приведенном ниже коде отображались данные Iris. Я имею в виду, как я могу прочитать мой большой .txt файл вместо Iris в этом коде, пожалуйста?
ui <- dashboardPage(
dashboardHeader(),
dashboardSidebar(),
dashboardBody(
fluidRow(
tabBox(width = 12, height = NULL,
tabPanel("Data", value=2,
fluidRow(
column(width = 4, box(title = "Iris", width = NULL, solidHeader = FALSE, dataTableOutput("dat1")))
)
)
)
)))
server <- function(input, output) {
output$dat1 <- renderDataTable({datatable(iris)})
}
shinyApp(ui, server)