knitr::opts_chunk$set(echo = TRUE, collapse = TRUE)
library(HypergeoMat) library(microbenchmark)
jhpq <- hypergeomPFQ_julia()
microbenchmark( Rcpp = hypergeomPFQ(m = 30, a = c(1, 2, 3), b = c(4, 5), x = c(0.1, 0.2, 0.3)), Julia = jhpq(m = 30, a = c(1, 2, 3), b = c(4, 5), x = c(0.1, 0.2, 0.3)), times = 10 )
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.