我正在尝试抓取以下网站的数据框
http://stats.nba.com/game/0041700404/playbyplay/ http://stats.nba.com/game/0041700404/playbyplay/
我想创建一个表格,其中包含比赛日期、整场比赛的得分以及球队名称
我正在使用以下代码:
game1 <- read_html("http://stats.nba.com/game/0041700404/playbyplay/")
#Extracts the Date
html_nodes(game1, xpath = '//*[contains(concat( " ", @class, " " ), concat( " ", "game-summary-team--vtm", " " ))]//*[contains(concat( " ", @class, " " ), concat( " ", "game-summary-team__lineup", " " ))]')
#Extracts the Score
html_nodes(game1, xpath = '//*[contains(concat( " ", @class, " " ), concat( " ", "status", " " ))]//*[contains(concat( " ", @class, " " ), concat( " ", "score", " " ))]')
#Extracts the Team names
html_nodes(game1, xpath = '//*[contains(concat( " ", @class, " " ), concat( " ", "game-summary-team__name", " " ))]//a')
不幸的是,我得到以下信息
{xml_nodeset (0)}
{xml_nodeset (0)}
{xml_nodeset (0)}
我看过很多关于这个问题的问题和答案,但似乎没有一个有帮助。