powered by
priorL2(mu, lambda = "lambda", attr.name = "prior", condition = NULL)
p
NULL
objlist
p <- c(A = 1, B = 2, C = 3, lambda = 0) mu <- c(A = 0, B = 0) obj <- priorL2(mu = mu, lambda = "lambda") obj(pars = p + rnorm(length(p), 0, .1))
Run the code above in your browser using DataLab