R 中未定义的命名空间 xml2

Question

我正在学习如何使用 R 来解析 XML，并且我正在尝试使用 Hadley 的 Wickhamxml2包来解析位于此处的TEI XML 文本文档（警告：这是一个压缩文件，我正在尝试解析的特定文件）在下面的代码中给出）。我试图了解命名空间在这个包中的工作原理（我无法理解我正在使用的特定文本的文档）。有了这个XML包，我可以执行以下操作：

library("XML")
crisis <- xmlParse("data/Crisis130_22.2.tei.xml")
all_divs <- getNodeSet(crisis, "//def:div",
                   namespaces=c(def = "http://www.tei-c.org/ns/1.0"))

但是，我不知道如何做到这一点xml2。我要么收到inherits(x, "xml_document") is not TRUE错误，要么收到In node_find_all(x$node, x$doc, xpath = xpath, nsMap = ns) : Undefined namespace prefix [1219]错误。这是我尝试过的：

library("xml2")

crisis2 <- read_xml("data/Crisis130_22.2.tei.xml")

# check to see whether TEI URL is present
xml_ns(crisis2) 

all_divs2 <- xml_find_all(crisis2, "//div", xml_ns(crisis2)) # gives empty list

all_divs <- xml_find_all(crisis2, "/def:div", xml_ns(crisis2)) # undefined namespace error

我知道这是一个新包，但是有人知道如何在其中使用命名空间吗？

Answer 1

好吧，我自己想出来了，但我想我应该把它发布在这里而不是删除问题。

library("xml2")
crisis2 <- read_xml("data/Crisis130_22.2.tei.xml")
all_divs <- xml_find_all(crisis2, "//d1:div", xml_ns(crisis2))

回想起来，我想答案是显而易见的，但是，正如我所说，我想我会在这里发布解决方案，以防它将来对任何人有帮助。