pkg/R/EMGLLF.R

   1 #' EMGLLF
   2 #'
   3 #' Description de EMGLLF
   4 #'
   5 #' @param phiInit ...
   6 #'
   7 #' @return ...
   8 #'
   9 #' @examples
  10 #' ...
  11 #' ...
  12 #' @export
  13 EMGLLF <- function(phiInit, rhoInit, piInit, gamInit,
  14     mini, maxi, gamma, lambda, X, Y, tau)
  15 {
  16     .Call("EMGLLF", phiInit, rhoInit, piInit, gamInit,
  17         mini, maxi, gamma, lambda, X, Y, tau, PACKAGE="valse")
  18 }