Nothing
#' Calculates the confidence intervals for one condition
#' \code{one_parci} calculates the confidence intervals for one condition
#' @keywords internal
#' @export
one_parci <- function(d, ci) {
parinf <- quantile(d$par, .5*(1 - ci))[[1]]
parsup <- quantile(d$par, 1 - .5*(1 - ci))[[1]]
data.frame(parinf, parsup)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.