Use R package microbenchmark
to compare the performance of C functions.
1 2 3 4 5 6 7 8 | ## Not run:
ts <- microbenchmark(
rwC = rwMetropolisC(0.5, x0, N=1000),
rwR = rw.Metropolis(0.5, x0, N=1000))
print(summary(ts)[, c(1,3,5,6)])
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.