tests/marshal.xml2.R
In HenrikBengtsson/marshal: Framework to Marshal Objects to be Used in Another R Process
library(marshal)
if (requireNamespace("xml2", quietly = TRUE)) {
message("XML document:")
doc <- xml2::read_xml("<body></body>")
## Assert marshallability
stopifnot(marshallable(doc))
## Marshal 'xml_document' object
doc_ <- marshal(doc)
## Unmarshal 'xml_document' object
doc2 <- unmarshal(doc_)
print(doc2)
stopifnot(all.equal(doc2, doc))
message("HMTL document:")
file <- system.file("extdata", "r-project.html", package = "xml2")
doc <- xml2::read_html(file)
## Assert marshallability
stopifnot(marshallable(doc))
## Marshal 'xml_document' object
doc_ <- marshal(doc)
## Unmarshal 'xml_document' object
doc2 <- unmarshal(doc_)
print(doc2)
stopifnot(all.equal(doc2, doc))
}
HenrikBengtsson/marshal documentation built on June 11, 2024, 11:35 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
library(marshal)
if (requireNamespace("xml2", quietly = TRUE)) {
message("XML document:")
doc <- xml2::read_xml("<body></body>")
## Assert marshallability
stopifnot(marshallable(doc))
## Marshal 'xml_document' object
doc_ <- marshal(doc)
## Unmarshal 'xml_document' object
doc2 <- unmarshal(doc_)
print(doc2)
stopifnot(all.equal(doc2, doc))
message("HMTL document:")
file <- system.file("extdata", "r-project.html", package = "xml2")
doc <- xml2::read_html(file)
## Assert marshallability
stopifnot(marshallable(doc))
## Marshal 'xml_document' object
doc_ <- marshal(doc)
## Unmarshal 'xml_document' object
doc2 <- unmarshal(doc_)
print(doc2)
stopifnot(all.equal(doc2, doc))
}
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.