Nothing
sum_raw <- function(x, nThread = getOption("hutilscpp.nThread", 1L)) {
.Call("Csum_raw", x, nThread, PACKAGE = "hutilscpp")
}
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.