# sink the output down to nowhere for cleaner testing.
results <- file("Results.Rout", open = "wt")
sink(results, type = "message")
api <- coreAPI(env$auth)
con <- suppressWarnings(authBasic(api, useVerbose = verbose))
data <- jsonlite::fromJSON(env$data)
# configure test environment for JSON SDK usage
pfsrsdk:::loadXmlConfigFile(con$coreApi, appName = "core_CoreApp.SDK")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.