bc(0.5, 1.5)
bc(1, 0)
obvious <- function(lambda){(0.6^lambda - 1) / lambda} # at y = 0.6
plot(obvious, xlab="lambda", xlim=c(1e-6, 1e-9), log="x")
bc_inv(-0.4, 1.5)
bc_inv(0, 0)
bc_prime(0.5, 1.5)
bc_prime(1, 0)
Run the code above in your browser using DataLab