R/global.R
IndicFinit.Rd
This is an helper function to create initial values F matrices for networks.
IndicFinit(sqF, ngrp, Indic, low.trig = TRUE)
Size of an F cell
Number of groups
Matrix to specify where there is an interaction from one group to another
Fill the lower trigonal matrices with ones
An array of size (sqF, sqF, ngrp).
IndicFinit(3, 2, matrix(1,2,2)-diag(2))
#> , , 1
#>
#> [,1] [,2] [,3]
#> [1,] 0 0 0
#> [2,] 0 0 0
#> [3,] 0 0 0
#>
#> , , 2
#>
#> [,1] [,2] [,3]
#> [1,] 0 0 0
#> [2,] 1 0 0
#> [3,] 1 1 0
#>
#> , , 3
#>
#> [,1] [,2] [,3]
#> [1,] 0 0 0
#> [2,] 1 0 0
#> [3,] 1 1 0
#>
#> , , 4
#>
#> [,1] [,2] [,3]
#> [1,] 0 0 0
#> [2,] 0 0 0
#> [3,] 0 0 0
#>