Nothing
RcppParallel:::test_init()
Rcpp::sourceCpp(system.file("tests/cpp/sum.cpp", package = "RcppParallel"))
v <- as.numeric(1:10000000)
assert(all.equal(
vectorSum(v),
parallelVectorSum(v)
))
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.