#harmonize_romans <- function (s, harm) {
#
# # Harmonize
# for (i in 1:nrow(harm)) {
# s <- gsub(harm$synonyme[[i]], harm$name[[i]], s)
# }
#
# s
#
#}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.