r - 在 R 中将字符编码为 HTML，CRAN 方式

Question

在投票关闭重复之前，请确保它确实回答了我在这里的特定问题。问题可能看起来很相似，但我还没有找到适合我的答案。谢谢。

---

我正在寻找一种将任意标量字符转换为 HTML 编码形式的方法。我不想只编码 < , "等，但全文。

所以表格的文字

"<abc at def.gh>"

编码为

"<abc at def.gh>"

我的目标是与 CRAN 编码维护者电子邮件地址的方式兼容。 所以 <不应该是 <但应该是< .同样.不应该是 .但应该是. .

要在 CRAN 上查看它，您可以访问任何包的 CRAN 页面，即 https://cran.r-project.org/package=curl ，然后“查看源代码”并找到 Maintainer那里的字段。

我正在寻找一个需要尽可能少的依赖项的轻量级解决方案，它不一定要很快。

供引用，解码编码字符串的在线工具:https://onlineasciitools.com/convert-html-entities-to-ascii

Answer 1

这是一些快速的东西(没有经过彻底测试)。它的灵感来自 another SO answer .

foo <- function(x) {
  splitted <- strsplit(x, "")[[1]]
  intvalues <- as.hexmode(utf8ToInt(enc2utf8(x)))
  paste(paste0("&#x", intvalues, ";"), collapse = "")
}

all.equal(
  foo("<abc at def.gh>"),
  "&#x3c;&#x61;&#x62;&#x63;&#x20;&#x61;&#x74;&#x20;&#x64;&#x65;&#x66;&#x2e;&#x67;&#x68;&#x3e;"
)
# [1] TRUE