This provides a human readable version of the segment content that is modelled on the way Mozilla Thunderbird and other email clients provide an automatic conversion of HTML content to text in their alternative MIME encoding of emails.

render_html_to_text(x)

Arguments

x

HTML content (length 1 character vector)

Value

character vector of cleaned text

Examples

# NOT RUN {
fils <- list.files(system.file("extdata", package="jericho"), full.names=TRUE)
for (f in fils) {
  d <- readBin(f, "raw", file.size(f))
  d <- rawToChar(d)
  render_html_to_text(d)
}
# }