Skip to contents

Basic usage

standard_normal <- rnorm(100)
c(lower_pi(standard_normal), upper_pi(standard_normal))
#> [1] -2.358136  2.383054

Custom interval

lower_pi(standard_normal, 0.89)
#> [1] -1.84468