Create LCA.R

compare LCA models by ploting aic, bic and llik