如何从网络而不是此数据表呈现表？

Question

我通过此链接https://www.dropbox.com/s/k94brqtrp5thch3/005.txt?dl=0在投递箱中存储了一个太大的表；我需要以下面的代码显示虹膜数据的方式访问此表。我的意思是，请问如何在此代码中读取我的大.txt文件而不是鸢尾花？

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)