revdep/library/trafo/old/Rcpp/examples/OpenMP/check.R

dyn.load("piWithInterrupts.so")
#res <- .Call("PiLeibniz", n=1e9, frequency=1e6)
res <- .Call("PiLeibniz", n=1e9, frequency=1e6)
print(res, digits=10)
akreutzmann/trafo documentation built on Sept. 14, 2020, 9:03 p.m.