projects
/
valse.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
add verbose possibility in sub-functions
[valse.git]
/
pkg
/
R
/
EMGLLF_R.R
diff --git
a/pkg/R/EMGLLF_R.R
b/pkg/R/EMGLLF_R.R
index
039e291
..
227d803
100644
(file)
--- a/
pkg/R/EMGLLF_R.R
+++ b/
pkg/R/EMGLLF_R.R
@@
-150,7
+150,7
@@
EMGLLF_R = function(phiInit,rhoInit,piInit,gamInit,mini,maxi,gamma,lambda,X,Y,ta
ite = ite+1
}
-
+
affec = apply(gam, 1, which.max)
return(list("phi"=phi, "rho"=rho, "pi"=pi, "LLF"=LLF, "S"=S, "affec" = affec ))
}