-1

我正在尝试创建一个小函数来帮助从在线托管的 excel 电子表格中读取数据。

read2014 <- function(urlhere, filename){
      url <- urlhere
      destfile <- filename
      curl::curl_download(url, destfile)
      filename <- read_excel(destfile, skip = 14)
}

但是，当我尝试使用这些参数值调用函数时，什么也没有发生。

read2014(urlhere = "https://www.england.nhs.uk/statistics/wp-content/uploads/sites/2/2013/04/Beds-Open-Overnight-Web_File-Q1-2014-15-Revised-Nov15-Final-21447.xlsx", filename = "X2014_Q1")

但是，当我在不使用函数的情况下调用正文时，它将电子表格作为数据框输入到环境中，没有问题。

url <- "https://www.england.nhs.uk/statistics/wp-content/uploads/sites/2/2013/04/Beds-Open-Overnight-Web_File-Q1-2014-15-Revised-Nov15-Final-21447.xlsx"
destfile <- "X2014_Q1.xlsx"
curl::curl_download(url, destfile)
X2014_Q1 <- read_excel(destfile, skip = 14)

我以前从未编写过函数，所以我不确定如何解决这个问题。

4

1 回答 1

1

就像我在评论中提到的那样，您忘记分配输出。

object <- read2014(urlhere = "https://www.england.nhs.uk/statistics/wp-content/uploads/sites/2/2013/04/Beds-Open-Overnight-Web_File-Q1-2014-15-Revised-Nov15-Final-21447.xlsx", filename = "X2014_Q1")
于 2018-08-09T09:16:01.050 回答