Я пытаюсь получить таблицу «Стандартный ватин игрока» 2018 от baseball-reference.com. на странице URL есть несколько таблиц, и когда я запускаю следующий код. Я могу получить только первую таблицу в списке таблиц. Мне нужен второй стол, который является стандартным ватином игрока.
library(rvest)
url <- "https://www.baseball-reference.com/leagues/MLB/2018-standard-batting.shtml"
pg <- read_html(url)
tb <- html_table(pg, fill = TRUE)
df_batting <- tb[[1]]