tests/benchmarks/softcoverage.R

library(microbenchmark)
designad <- readRDS("F:/Documents/code_projects/adestr/data/designad.rds")

microbenchmark(
  evaluate_estimator(SoftCoverage(1e4), LikelihoodRatioOrderingCI(), Normal(FALSE), FALSE, designad, mu=0, sigma = 1),
  evaluate_estimator(Coverage(), LikelihoodRatioOrderingCI(), Normal(FALSE), FALSE, designad, mu=0, sigma = 1),
 times = 1
)

Try the adestr package in your browser

Any scripts or data that you put into this service are public.

adestr documentation built on Sept. 11, 2024, 6:05 p.m.