我的 xpath 应用 returns NULL 值

My xpath apply returns NULL value

我正在尝试构建网络爬虫并为网站提取信息 “http://www.rcsb.org/pdb/home/home.do”。

library(RCurl)
library(XML)

url     <- "http://www.rcsb.org/pdb/home/home.do"
page    <- getURL(url)
parsed  <- htmlTreeParse(page, useInternalNodes = TRUE)

extract <- xpathApply(
    parsed, 
    "//*/href[@id='navbar-collapse-RCSB']/ul/li"
)

这是我用于进入上述网站中 "Search" 标签的代码 执行此代码后,我得到一个 Null 或空列表。 我怎样才能从这些网站中提取我的数据。

问题没有具体说明需要什么输出,但也许这会让你开始:

library(XML)
url <- "http://www.rcsb.org/pdb/home/home.do"
doc <- htmlTreeParse(url, useInternalNodes = TRUE)
xp <- xpathApply(doc, "//*/div[@id='navbar-collapse-RCSB']/ul/li")