Frage RVest-Fehler: Geben Sie 'externalptr' ein


Ich versuche zu benutzen rvest um das Geburtsdatum für PGA-Golfer zu extrahieren. Versuchen wir es mit Stuart Appleby. Hier ist sein Profil auf der ESPN-Website http://espn.go.com/golf/player/_/id/11/stuart-appleby. Bemerke seinen DOB neben seinem Kopfschuss.

library("rvest")
url <- "http://espn.go.com/golf/player/_/id/11/stuart-appleby"
li_node <- url %>% html %>% html_nodes("li")

Sein Geburtsdatum ist in Punkt 22 von li_node enthalten. Idealerweise würde ich [[22]] in meinem Programm nicht fest programmieren, aber selbst wenn ich das tue, stoße ich auf Fehler.

li_node[[22]]

zeigt die Informationen an, die ich möchte, aber Sachen wie:

word(li_node[[22]], ...)
substr(li_node[[22]], ...)
pluck(li_node, 22)

Alle geben einen Fehler zurück:

> word(li_node[[22]], 1)
Error in rep(string, length = n) : 
  attempt to replicate an object of type 'externalptr'
> substr(li_node[[22]], 1, 2)
Error in as.vector(x, "character") : 
  cannot coerce type 'externalptr' to vector of type 'character'
> pluck(li_node, 22)
Error in FUN(X[[1L]], ...) : 
  object of type 'externalptr' is not subsettable

Gibt es eine einfache Möglichkeit für mich, diesen DOB zu benutzen? rvest?


5
2018-02-26 17:44


Ursprung


Antworten:


library("rvest")
library("stringr")
url <- "http://espn.go.com/golf/player/_/id/11/stuart-appleby"
url %>% 
  html %>% 
  html_nodes(xpath='//li[contains(.,"Age")]') %>% 
  html_text() %>% 
  str_extract("[A-Z][a-z]{2,} [0-9]{1,2}, [0-9]{4}")

kehrt zurück:

[1] "May 1, 1971"

6
2018-02-26 17:58