使用 RSelenium 下載 pdf

Question

我想用RSelenium包做的是，

步驟：1 訪問網站 - 我自己的電力供應商

步驟：2 通過明確提供我的用戶名和密碼來訪問我的帳戶（這就是我無法共享代碼的原因）

步驟：3 我點擊“查看我的賬單” 。 賬單以pdf格式顯示。

有沒有辦法下載該文件並保存到特定文件夾？ 當我使用download.file()命令時，它不保存文檔，而是我得到一個 3KB 的 pdf 文件，我無法打開。 Adobe Reader 說閱讀文檔時出錯。

我嘗試過的可能方法： 1. 右鍵單擊，按向下箭頭四次，然后進入“另存為”，然后單擊 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 （使用此鏈接找到答案）

然后更新了我的程序

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)

仍在嘗試更改我無法找到的下載文件夾。 我從這個鏈接找到了答案