我想下载这个文件到R进行分析,但我有困难解压缩文件从临时目录。
我的代码如下所示:
install.packages("pacman")
library(pacman)
#Load Libraries
pacman::p_load(tidyverse,tidymodels,modeltime,timetk,googledrive)
temp <- tempfile(fileext = ".zip")
dl <- drive_download(
as_id("https://drive.google.com/file/d/17ZhE3nxqtGYNzeADMzU02YzfKU9H9f5j/view?usp=sharing"),
path = temp,
overwrite = TRUE,
type = "xlsx")
out <- unzip(temp, exdir = tempdir())
#Import Data
Three_Time_Series <- read_excel(out[1])
当我检查
out
变量我看到它是一个大小为1:10的字符向量,但每个字符串引用xml文件。在最后一行,我试着读懂了
out[1:10]
但每次它都说:
Error: Can't establish that the input is either xls or xlsx.
任何提示都将不胜感激。