This is an helper function to create initial values F matrices for networks.

IndicFinit(sqF, ngrp, Indic, low.trig = TRUE)

Arguments

sqF

Size of an F cell

ngrp

Number of groups

Indic

Matrix to specify where there is an interaction from one group to another

low.trig

Fill the lower trigonal matrices with ones

Value

An array of size (sqF, sqF, ngrp).

Author

Bertrand Frederic, Myriam Maumy-Bertrand.

Examples


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
#>