gcwm (Y, X, familyY="Gaussian", k=2, ic=c("BIC", "AIC", "ICL"), mY=1,
method="Nelder-Mead", initialization="random.soft", start.z=NULL,
iter.max=1000, threshold=1.0e-04, loglikplot=FALSE, seed=NULL)"Gaussian""Poisson""Binomial""Gamma"lencgth(k)>1. Possible values are
"BIC""AIC""ICL"familyY="Binomial", it sets the sample size. Default value is 1 (Bernoulli distribution).optim). Default value is "Nelder-Mead"."random.soft""random.hard""manual""random.soft".initialization="manual".NULL, current seed is not changed. Default value is NULL.familyY="Binomial"callflexCWM-package, tourismdata(tourism)
Y <- tourism$overnights
X <- tourism$attendance
res <- gcwm(Y=Y,X=X,k=1:4,seed=1)
plot(cbind(Y,X),col=res$best$group)Run the code above in your browser using DataLab