.onLoad <- function(libname, pkgname) {
p <- system.file("java", "", package="vietr")
Sys.setenv(user.dir=substr(p, 1, nchar(p) - 1))
.jpackage(pkgname, lib.loc = libname)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.