powered by
priorL2(p, mu, lambda = "lambda", fixed = NULL)
p
obj
p <- c(A = 1, B = 2, C = 3, lambda = 1) mu <- c(A = 0, B = 0) priorL2(p, mu, lambda = "lambda")
Run the code above in your browser using DataLab