nk:

In SaraTouzani/EM: Algorithme EM ("Espérance-Maximisation")

Usage

nk(tkx)

Arguments

tkx

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (tkx) 
{
    k <- ncol(tkx)
    nk <- list(0, k)
    for (i in 1:k) {
        nk[i] <- sum(tkx[, i])
    }
    return(unlist(nk))
  }

SaraTouzani/EM documentation built on Dec. 16, 2019, 12:31 a.m.