Как ни странно, получается, что as.character()
работает просто отлично.
Таким образом:
library(rvest)
html <- read_html("http://stackoverflow.com")
res <– html %>%
html_node("h1") %>%
as.character()
> res
[1] "<h1 class=\"-title\">Learn, Share, Build</h1>"
Это желаемый вывод в моем текущем случае использования.
С другой стороны, для сравнения, если нужно убрать теги:
res <- html %>%
html_node("h1") %>%
html_text()
> res
[1] "Learn, Share, Build"