I am using the following script:
lambda <- BoxCox.lambda(coronaCa,lower=0) InvBoxCox(coronaCa, lambda, biasadj = FALSE, fvar = NULL)
I am gett