使用 RSelenium 下载 pdf

Question

我想用RSelenium 包做的是，

步骤：1 访问网站 - 我自己的电力供应商

步骤：2 通过明确提供我的用户名和密码来访问我的帐户（这就是我无法共享代码的原因）

步骤：3 我点击“查看我的账单”。 账单以 pdf 格式显示。

有没有办法下载该文件并保存到特定文件夹？ 当我使用download.file() 命令时，它不会保存文档，而是得到一个无法打开的 3KB pdf 文件。 Adobe Reader 说读取文档时出错。

我尝试过的可能方法： 1. 右键单击​​，按四次向下箭头，然后到'SAVE PAGE AS'点击Enter。

然后它会弹出一个对话框，询问文件名和位置，我无法通过 RSelenium 输入这些详细信息并保存文件。

示例代码：网上随机找到的一些 PDF。

url<- "http://www.immigrationpolicy.org/sites/default/files/docs/how_us_immig_system_works.pdf"

setwd("C:/Users/king/Desktop/bill")
library(RSelenium)
library(downloader)
checkForServer()
startServer()
remDr <- remoteDriver()
remDr$open()
remDr$navigate(url)

Answer 1

我在不断的研究中找到了答案。

首先检查是否Rtools is installed（使用此链接找到答案）

然后更新了我的程序

cprof<-makeFirefoxProfile(list(
  "pdfjs.disabled"=TRUE,
  "plugin.scan.plid.all" = FALSE,
  "plugin.scan.Acrobat" = "99.0",
  "browser.helperApps.neverAsk.saveToDisk"='application/pdf',
  ))
remDr <- remoteDriver(extraCapabilities=cprof)

仍在尝试更改我尚未找到的下载文件夹。我从THIS link找到答案