用R字符编码编写html的问题

我想从R输出html，但遇到了一些特殊字符的问题。举例来说，函数：

output = function(str, fn){ sink(fn); cat(str); sink(); browseURL(fn) }
output("It's an apostrophe", 'good.html')

---

感谢您提供无需特别字符替换的通用解决方案的提示。

您没有在HTML文件中指定编码，因此浏览器猜测-badly1。这是文本数据的一般问题，但对于HTML有一个简单的解决方案：在HTML中指定编码；例如：

这是一个正确的单引号

…并将此文本作为UTF-8写入文件：

output = function (str, filename) {
    file = file(filename, encoding = 'UTF-8')
    on.exit(close(file))
    cat(str, file = file)
    browseURL(filename)
}

---

---

1尽管这取决于很多因素：在我的电脑上，你的代码恰好可以工作。

谢谢康拉德。简单的

output = function (str, filename) {
    file = file(filename, encoding = 'UTF-8')
    on.exit(close(file))
    cat(str, file = file)
    browseURL(filename)
}