outputFolder <- file.path(.libPaths()[1], "ICARUSviewer/Output")
TempFolder <- file.path(.libPaths()[1], "ICARUSviewer/Temp")
options(fftempdir = TempFolder)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.