如何使用RCurl下载文件

时间:2014-06-10 16:23:26

标签: r rcurl

我想下载一个文件,但我必须使用POST发送变量才能执行此操作。现在我使用postForm函数发送变量,但我不知道如何下载文件。

postForm返回类似这样的内容:

doc <- postForm("http://gpwinfostrefa.pl/GPWIS2/pl/quotes/archive/3", 
                dateFrom="2014-05-10", dateTo = "2014-06-10", 
                instrumentType = "10", isin="PLOPTTC00011", style="post",
                .opts=curlOptions(encoding="UTF-8", http.version=HTTP_VERSION_1_0))

> doc
[1] d0 cf 11 e0 a1 b1 1a e1 00 00 00 00 00 00 00 00 00 00 00 00 ...

attr(,"Content-Type")       charset 
"application/csv"           "UTF-8"

> str(doc)
atomic [1:10752] d0 cf 11 e0 ...
- attr(*, "Content-Type")= Named chr [1:2] "application/csv" "UTF-8"
..- attr(*, "names")= chr [1:2] "" "charset"

但我不知道我是否可以用这个做点什么。是否有可能(可能使用其他功能)下载文件同时发送变量。

(PS。该文件是Excel文件,即使Content-Type声明它是csv)

1 个答案:

答案 0 :(得分:1)

将其作为二进制向量写入文件:

 > writeBin(as.vector(doc),"doc.xls")

然后我可以用Libre Office打开该文件。

当你提出整个问题时,它更容易回答!