Nothing
.onLoad <- function(libname, pkgname){
if (is.null(getOption("MTurkR.logdir"))) {
options(MTurkR.logdir = getwd()) # MTurkRlog.tsv directory
}
if (is.null(getOption("MTurkR.sandbox"))) {
options(MTurkR.sandbox = FALSE) # sandbox logical
}
if (is.null(getOption("MTurkR.verbose"))) {
options(MTurkR.verbose = TRUE) # print logical
}
if (is.null(getOption("MTurkR.browser"))) {
options(MTurkR.browser = FALSE) # browser logical
}
if (is.null(getOption("MTurkR.log"))) {
options(MTurkR.log = TRUE) # log logical
}
if (is.null(getOption("MTurkR.test"))) {
options(MTurkR.test = FALSE) # validation.test logical
}
}
.onAttach <- function(libname, pkgname) {
if (Sys.getenv("AWS_ACCESS_KEY_ID") == "") {
packageStartupMessage("Environment variable AWS_ACCESS_KEY_ID not set!")
}
if (Sys.getenv("AWS_SECRET_ACCESS_KEY") == "") {
packageStartupMessage("Environment variable AWS_SECRET_ACCESS_KEY not set!")
}
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.