BIKM1_MLBM_Binary-class {bikm1} | R Documentation |

## Class "BIKM1_MLBM_Binary"

### Description

Class of object returned by the `BIKM1_MLBM_Binary`

function.

### Slots

`model_max`

:The selected model by the procedure with free energy W, theta, conditional probabilities (s_ig, r_jh, t_kl), iter, empty_cluster, and the selected partitions z, v and w.

`criterion_choice`

:A character string corresponding to the chosen criterion used for model selection, which can be "ICL" or "BIC".

`init_choice`

:A character string corresponding to the chosen initialization strategy used for the procedure, which can be "random" or "Gibbs" or "smallVBayes".

`criterion_tab`

:The matrix corresponding to the values of the chosen criterion for pairs of numbers of clusters visited by the BIKM1_MLBM_Binary function. The matrix rows design the numbers of row clusters. If a pair is not visited, by default, the value is -Inf.

`W_tab`

:The matrix corresponding to the values of the free energy (minimizer of the loglikelihood in the algorithm) for pairs of numbers of clusters visited by the procedure. The matrix rows design the numbers of row clusters. If a pair is not visited, by default, the value is -Inf.

`criterion_max`

:Numeric indicating the maximum of the criterion values, calculated on the pairs of numbers of clusters visited by the BIKM1_MLBM_Binary function.

`gopt`

:An integer value indicating the number of row clusters selected by the BIKM1_MLBM_Binary function.

`hopt`

:An integer value indicating the number of column clusters for the first matrix selected by the BIKM1_MLBM_Binary function.

`lopt`

:An integer value indicating the number of row clusters for the second matrix selected by the BIKM1_MLBM_Binary function.

### Examples

```
require(bikm1)
n=200
J=120
K=120
g=3
h=2
l=2
theta=list()
theta$pi_g=1/g *matrix(1,g,1)
theta$rho_h=1/h *matrix(1,h,1)
theta$tau_l=1/l *matrix(1,l,1)
theta$alpha_gh=matrix(runif(6),ncol=h)
theta$beta_gl=matrix(runif(6),ncol=l)
data=BinBlocRnd_MLBM(n,J,K,theta)
res=BIKM1_MLBM_Binary(data$x,data$y,3,3,3,4,init_choice='smallVBayes')
```

*bikm1*version 1.1.0 Index]