I would like to convert HTML character entities like
&
to &
o
Unescape xml/html values using xml2
package:
unescape_xml <- function(str){
xml2::xml_text(xml2::read_xml(paste0("", str, " ")))
}
unescape_html <- function(str){
xml2::xml_text(xml2::read_html(paste0("", str, " ")))
}
Examples:
unescape_xml("3 < x & x > 9")
# [1] "3 < x & x > 9"
unescape_html("€ 2.99")
# [1] "€ 2.99"