从XML包中保存htmlParse对象

Question

我想保存htmlParse命令的结果对象。下面是一些代码来说明我的问题。简单地说，我希望能够将解析的HTML页面保存到一个对象中，并将其加载到将来的会话中。

library(XML)
PATH = "/colleges/Bentley-University"
URL <- paste("http://www.cappex.com", PATH, sep="")
doc <- htmlParse(URL)
mylist <- list(doc)
mylist[[1]]
save(mylist, file="mylist.Rdata")
rm(list=ls())
load("mylist.Rdata")

然而，当我尝试回想我的列表内容时，我得到的错误是：

> mylist[[1]]
Error in file(con, "r") : cannot open the connection
In addition: Warning message:
In file(con, "r") :
  cannot open file '/var/folders/hv/wtvckymn0230hpsdwylmtf0r0000gn/T//Rtmp8Mrpev/fileed256550e50': No such file or directory

Answer 1

无法保存doc，因为它是指向“C级节点”的指针。将其列在列表中并不能改变这一事实。您可以先将XML树的表示形式写入字符串，然后再保存它。在您可以恢复文本之后。

library(XML)
PATH = "/colleges/Bentley-University"
URL <- paste("http://www.cappex.com", PATH, sep="")
doc <- htmlParse(URL)
saveXML(doc, file="ex.txt")
rm(list=ls())

# recover
doc<-htmlParse('ex.txt')