simulations : NA changing nested structure params

This commit is contained in:
Louis Lacoste 2024-07-25 19:49:05 +02:00
parent f78d232d8a
commit 0a43ccbe2b

View file

@ -60,8 +60,8 @@ alpha <- switch(struct,
},
"nested" = {
alpha <- matrix(c(
0.9, 0.25, 0.1,
0.3, 0.15, eps,
0.9, 0.65, 0.1,
0.35, 0.15, eps,
0.1, eps, eps
), byrow = TRUE, nrow = length(pir), ncol = length(pic))
}