2012-04-04 14 views

答えて

3

a要素を抽出し、xmlGetAttrを呼び出すことができます。

library(RCurl) 
library(XML) 
script <- getURL("www.r-bloggers.com") 
doc <- htmlParse(script) 
li <- getNodeSet(doc, "//ul[@class='xoxo blogroll']//a") 
sapply(li, xmlGetAttr, "href") 

また、直接xpathApplyを使用することができます。

xpathSApply(doc, 
    "//ul[@class='xoxo blogroll']//a", 
    xmlGetAttr, "href" 
) 
+0

多くのおかげで、再び! – Kay

関連する問題