Connection Error: divipola_table() fails to reach DIVIPOLA.csv

[luifrancgom]

Please place an "x" in all the boxes that apply

• I have the most recent version of this package and R
• I have found a bug
• I have a reproducible example
• I want to request a new feature

---

When you run divipola_table() it cannot reach out https://tracelac.uniandes.edu.co:9000/colopendata/support/DIVIPOLA.csv:

library(ColOpenData)

# Attempting to fetch the DIVIPOLA table
div_data <- divipola_table()
#> Error in `file()`:
#> ! cannot open the connection to 'https://tracelac.uniandes.edu.co:9000/colopendata/support/DIVIPOLA.csv'
head(div_data)
#> Error:
#> ! object 'div_data' not found

For example I get the following for https://tracelac.uniandes.edu.co:9000/colopendata/support/DIVIPOLA.csv:

library(httr)
response <- GET("https://tracelac.uniandes.edu.co:9000/colopendata/support/DIVIPOLA.csv")
status_code(response)
#> [1] 503

Where the connection is refused. I don't know if the problem is server maintenance, capacity issues, that the service is down or another reason.

---