tests/sum.r
In wrathematics/Romp: R OpenMP Examples
library(Romp)
x <- rnorm(100)
R <- sum(x)
c <- c_sum(x)
f77 <- f77_sum(x)
f90 <- f90_sum(x)
rcpp <- rcpp_sum(x)
stopifnot(all.equal(R, c))
stopifnot(all.equal(R, f77))
stopifnot(all.equal(R, f90))
stopifnot(all.equal(R, rcpp))
wrathematics/Romp documentation built on May 4, 2019, 9:48 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
library(Romp)
x <- rnorm(100)
R <- sum(x)
c <- c_sum(x)
f77 <- f77_sum(x)
f90 <- f90_sum(x)
rcpp <- rcpp_sum(x)
stopifnot(all.equal(R, c))
stopifnot(all.equal(R, f77))
stopifnot(all.equal(R, f90))
stopifnot(all.equal(R, rcpp))
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.