Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/video/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
将CSV数据从Office 365导入R_R_Office365_Office365 Apps - Fatal编程技术网

将CSV数据从Office 365导入R

将CSV数据从Office 365导入R,r,office365,office365-apps,R,Office365,Office365 Apps,我在Office 365 Sharepoint上的文件夹中有CSV文件,我想将其导入R。在基本R中,我得到: > test <- read.csv("https://MYURL/:x:/r/sites/MYSITE/Shared%20Documents/Q_10_2018.csv? d=w5cbc38ea43c347689ec6d59a8285d769&csf=1&e=tZ6Lep",header=TRUE) Error in file(file, "rt") :

我在Office 365 Sharepoint上的文件夹中有CSV文件,我想将其导入R。在基本R中,我得到:

> test <- 
read.csv("https://MYURL/:x:/r/sites/MYSITE/Shared%20Documents/Q_10_2018.csv?
d=w5cbc38ea43c347689ec6d59a8285d769&csf=1&e=tZ6Lep",header=TRUE)
Error in file(file, "rt") : cannot open the connection
In addition: Warning message:
In file(file, "rt") :
  cannot open URL 
'https://MYURL.sharepoint.com/:x:/r/sites/MYSITE/Shared%20Documents/
Q_10_2018.csv?d=w5cbc38ea43c347689ec6d59a8285d769&csf=1&e=tZ6Lep': HTTP 
status was '403 FORBIDDEN'
我想提供一个可复制的问题,但由于这些是内部网站,我无法提供完整的URL并允许访问我们的公司服务器。此外,我在这里也找不到任何问题或其他文件来告诉我这个目标是否可以实现


有人有什么线索吗?提前感谢。

您可以通过
httr
完成此操作:

library(httr)
response <- GET("http://address-to-file", authenticate("Username", "password", "any"))
text_file <- str(content(response, "text"))
试试这个:

x <- read.csv(url("https://MYURL/:x:/r/sites/MYSITE/Shared%20Documents/Q_10_2018.csv..."))

x由于OneDrive的安全性以及它不是原始文件的直接链接,web路径可能无法工作。您可以通过文件资源管理器导航到该文件吗?如果您使用的路径类似于
C://Users/user/OneDrive/folder/file.csv
,它应该可以工作!设法进入,但正在下载文档元数据。尽管如此,我还是感觉到了一半。我将在周一找到我的Azure系统管理员,看看是否有一个开关可以在这一边翻转。届时将提供更新。谢谢:)
download.file("http://address-to-file", destfile = "/tmp/test.csv")
read.csv("/tmp/test.csv")
x <- read.csv(url("https://MYURL/:x:/r/sites/MYSITE/Shared%20Documents/Q_10_2018.csv..."))