2017-06-15 238 views
0

我有一个链接,我需要下载“.iqy”文件中的数据,我需要阅读该文件以进一步清理。自动下载.iqy文件并从中读取数据

我能够通过使用文件进入本链接(在第3行)做手工

con <- file("ABC1.iqy", "r", blocking = FALSE) readLines(con=con,n=-1L,ok=TRUE, warn=FALSE,encoding='unknown').

输出:

[1] "WEB" 
[2] "1" 
[3] "https:abc.../excel/execution/EPnx?view=vrs" [4] "" 
[5] "" 
[6] "Selection=AllTables" 
[7] "Formatting=None" 
[8] "PreFormattedTextToColumns=True" 
[9] "ConsecutiveDelimitersAsOne=True" 
[10] "SingleBlockTextImport=False" 
[11] "DisableDateRecognition=False" 
[12] "DisableRedirections=False" 
[13] "" 

我需要,而不是这自动化做手动。我有什么选择可以使用?

+0

@Moddy_Mudskipper:亚.. :)我刚刚得到它的权利。此外,您的代码工作但它拉它在一列这样

等。 – kishore

回答

0

只需使用download.file :)

con <- file("ABC1.iqy", "r", blocking = FALSE) 
dest_path <- "ABC.file" 
download.file(readLines(con=con,n=-1L,ok=TRUE, warn=FALSE,encoding='unknown')[3],destfile= dest_path) 

如果你看不懂,你得到的文件,请尝试:

download.file(readLines(con=con,n=-1L,ok=TRUE, warn=FALSE,encoding='unknown')[3],destfile= dest_path, mode = "wb") 
+0

'con < - file(“ABC1.iqy”,“r”,blocking = FALSE) 显示错误“文件错误(”ABC1.iqy“,”r“,blocking = FALSE): 无法打开连接“ – kishore

+0

这是你的代码:D –

COLUMN1 COLUMN2 栏3