.onAttach <-
function(libname, pkgname)
{
tou <- "\nTERMS OF USE NOTICE - Protected Health Information:
The Health Insurance Portability and Accountability Act of 1996 (HIPAA) established standards for health
information that must be kept private and secure, called Protected Health Information (PHI). The use of
PHI within the Duke Data Service is prohibited in this Alpha release. By proceeding, you attest that you
will not enter PHI. If you are unclear about what constitutes PHI, or are uncertain about the nature of
the data you use, please discontinue and contact the Duke University IT Security Office (security@duke.edu)
for further information."
packageStartupMessage(tou)
}
.onLoad <-
function(libname, pkgname)
{
.setCache("curlHeader", c('Content-Type'="application/json; charset=utf-8", 'Accept' = "application/json", "Accept-Charset"="utf-8"))
.setCache("sessionRefreshDurationMin", 1440)
.setCache("anonymous", FALSE)
.setCache("downloadSuffix", "unpacked")
.setCache("debug", FALSE)
.setCache("webRequestMaxTries", 10)
.setCache("webRequestMaxRedirects", 3)
.setCache("url","https://dukeds-dev.herokuapp.com")
.setCache('askUserUrl',TRUE)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.