list(beta = c(0.0, 0.0, 0.0, 0.0), r = 2)