Copied from knitr for internal use because it is unexported and CRAN rejects :::

escape_html(x)

Arguments

x

a character string to escape