powered by
Copied from knitr for internal use because it is unexported and CRAN rejects :::
knitr
escape_html(x)
a character string to escape