simulations : NA changing nested structure params
This commit is contained in:
parent
f78d232d8a
commit
0a43ccbe2b
1 changed files with 2 additions and 2 deletions
|
|
@ -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))
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue