curl::curl_download Error

[seabbs]

Data fails to download on Windows, as of the 22/01/18

Error is:

>tb_burden <- get_data(url = "https://extranet.who.int/tme/generateCSV.asp?ds=estimates",
+ save_name = "TB_burden",
+ save = TRUE, 
+ download_data = TRUE)
Downloading data from: https://extranet.who.int/tme/generateCSV.asp?ds=estimates
  % Total    % Received % Xferd  Average Speed   Time    Time     Time  Current
                                 Dload  Upload   Total   Spent    Left  Speed
  0     0    0     0    0     0      0      0 --:--:-- --:--:-- --:--:--     0
  0     0    0     0    0     0      0      0 --:--:-- --:--:-- --:--:--     0
100 19471    0 19471    0     0  19471      0 --:--:--  0:00:01 --:--:-- 10046
100  272k    0  272k    0     0   136k      0 --:--:--  0:00:02 --:--:--  106k
Error in curl::curl_download(input, tt, mode = "wb", quiet = !showProgress) : 
  Failure when receiving data from the peer
Calls: get_data -> <Anonymous> -> <Anonymous> -> .Call
Execution halted

[seabbs]

May be related to this issue in data.table: Rdatatable/data.table#1686

[seabbs]

Try a workaround with a manual download and install for instances when fread::data.table fails

[seabbs]

Base solution using utils::read.csv implemented. Passes local checks