## S3 method for class 'flexmix': fitted(object, drop=TRUE, aggregate=FALSE, ...)
"flexmix"
"FLXR"
TRUE
data("NPreg", package = "flexmix") ex1 <- flexmix(yn~x+I(x^2), data=NPreg, k=2) matplot(NPreg$x, fitted(ex1), pch=16, type="p") points(NPreg$x, NPreg$yn)
Run the code above in your browser using DataLab