test_that("encoding is always UTF-8", {
expect_equal(Encoding(utf8("\u00e4")), "UTF-8")
expect_equal(Encoding(utf8(iconv_to_latin1("\u00e4"))), "UTF-8")
expect_equal(Encoding(utf8(enc2utf8("\u00e4"))), "UTF-8")
expect_equal(
Encoding(utf8(c(iconv_to_native("\u00e4"), iconv_to_alien("\u00e4")))),
rep("UTF-8", 2)
)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.