This code works fine when run locally (Windows 10), but gives me the following error when I try to run it through shinyapps[dot]io:
Warning in open.connection(file, "rt") : cannot open URL 'https://www.thepredictiontracker.com/ncaapredictions.csv': HTTP status was '403 Forbidden'
The little bit that I could find online suggested that there may be some issues with shinyapps[dot]io's Linux environment handling URLs, but I can't figure out how to correct for this.
Does anyone have a workaround?
ui <- fluidPage(
fluidRow(
column(12, dataTableOutput("ncaaf_table"))
)
)
server <- function(input, output) {
output$ncaaf_table <- renderDataTable({
read.csv(url("https://www.thepredictiontracker.com/ncaapredictions.csv"))
})
}