R/pk.R

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

Defines functions pk

Documented in pk

pk <-
function(Nk,Xquanti){
  return(Nk/nrow(Xquanti))
}