好问题,可以复现,windows 下,直接浏览器打开链接下载没有问题(小问题是会乱码), R 代码下载
file_url <- "https://archive.ics.uci.edu/ml/machine-learning-databases/00242/ENB2012_data.xlsx"
file_dest <- paste("data", tail(unlist(strsplit(file_url, split = "/")),1), sep = "/") # data 目录下
download.file(file_url, file_dest, quiet = TRUE, method = "auto") # 必须指定 "libcurl" 或者 "auto"