在抓取网站以获得所需结果时遇到问题。该页面SBR.com具有“今天”和“明天”日期。我正在尝试仅获取设置为值date_data的今天的日期。但是，我在页面上获取了所有内容。 pinnacle_data也没有返回。通过检查页面可以看到它在那里，但是使用SelectorGadget的rvest似乎没有检索到它。我可以返回其他数据，但不能返回该数据。
所需结果
日期|时间|团队|开瓶器顶峰| 5角钱
到目前为止的代码：
library(rvest)
library(dplyr)
library(tm)
# Get Website
url <- paste0('https://www.sportsbookreview.com/betting-odds/nhl-hockey/')
webpage <- read_html(url)
# date
date_data_html <- html_nodes(webpage,'._2NwoU ._3rOGQ span')
date_data <- html_text(date_data_html)
date <- data.frame(Date = date_data)
#TEAM
team_data_html <- html_nodes(webpage,'._1ekCo')
team_data <- html_text(team_data_html)
#opener
opener_data_html <- html_nodes(webpage,'._2cc9d span')
opener_data <- html_text(opener_data_html)
#time
time_data_html <- html_nodes(webpage,'._1t1eJ div:nth-child(1) span:nth-child(1)')
time_data <- html_text(time_data_html)
# pinnacle
pinnacle_data_html <- html_nodes(webpage,'.slick-active:nth-child(2) span')
pinnacle_data <- html_text(pinnacle_data_html)
roster <- data.frame(TIME = time_data, TEAM = team_data, OPENER = opener_data, PINNACLE = pinnacle_data)