data(gaussData)
# This example takes some seconds:
#est.tle <- TLE(y~x,"gaussian",data=gaussData,nit=4, msglvl=1, cit=3,
# Density=flexmix.Density, Estimate=flexmix.Estimate, nc=2)
# Plot the 2-dimensional data
#tleplot(est.tle, gaussData)
Run the code above in your browser using DataLab