data(spikeInStat)
x <- Les(pos, pval)
x <- estimate(x, win=200, grenander=FALSE)
subset <- pos >= 5232300 & pos <= 5233200
x <- ci(x, subset, conf=0.90, nBoot=50)
plot(x, error="ci")
## Not run:
# ## multicore computation
# ## only available on certain platforms
# library(multicore)
# x <- ci(x, subset=150:200, conf=0.90, nBoot=50, nCores=2)
# ## End(Not run)
Run the code above in your browser using DataLab