Получить RSelenium для запуска JS для загрузки CSV с сайта - PullRequest
0 голосов
/ 12 июня 2019

Я надеюсь, что кто-нибудь там покажет мне, где я ошибся. Я пытаюсь загрузить некоторые данные таблицы лидеров бейсбола с сайта. Прямо сейчас я могу без проблем соскрести HTML-таблицу с сайта, но я бы хотел, чтобы R мог «нажать» на кнопку «Экспорт данных». Я хочу нажать кнопку и сохранить созданный файл CSV, потому что сайт выполняет некоторые действия в фоновом режиме во время процесса сохранения, и добавить столбец player_id, который необходим для сопоставления игроков между различными источниками данных.

Ниже мой прогресс в использовании другого вопроса RSelenium о переполнении стека

require(RSelenium)

# initialize the remote driver
remDr <- remoteDriver(browserName = "chrome", port = 4932L)
remDr$open(silent = TRUE)
# navigate to page
remDr$navigate("https://www.fangraphs.com/leaders.aspx?pos=all&stats=pit&lg=all&qual=y&type=8&season=2019&month=0&season1=2019&ind=0")

# this tells me I'm pointing at the right location
remDr$getCurrentUrl()

Вот попытка № 1

remDr$executeScript("__doPostBack('LeaderBoard1$cmdCSV','')")

и вот попытка № 2

webElem = remDr$findElement(using = 'xpath', '//*[@id="LeaderBoard1_cmdCSV"]')
webElem$clickElement()

Любая помощь будет оценена!

Приветствия

...