Calculate Factor Match Score for all initialized models.
Arguments
- models
Output of
parafac()using output="all".
Examples
A = array(rnorm(108*2), c(108, 2))
B = array(rnorm(100*2), c(100, 2))
C = array(rnorm(10*2), c(10, 2))
X = reinflateTensor(A, B, C)
models = parafac(X, 2, initialization="random", nstart=10, maxit=2, output="all")
calculateFMS(models)
#> [1] 0.025461441 0.051886842 0.023800382 0.007717426 0.040055884 0.042772256
#> [7] 0.084319630 0.090802289 0.024838915 0.034198819 0.039982563 0.048909237
#> [13] 0.046063679 0.063312176 0.035905995 0.031095529 0.026787061 0.050014313
#> [19] 0.036016638 0.023684890 0.042446021 0.053899948 0.031381054 0.015127195
#> [25] 0.052330629 0.014021322 0.015849344 0.050638957 0.041642001 0.028173094
#> [31] 0.029577363 0.058029880 0.012203774 0.023725391 0.052249522 0.008829398
#> [37] 0.017972498 0.035585396 0.035183596 0.028134644 0.021513035 0.023719843
#> [43] 0.031142829 0.016726202 0.038221313