chelseaparlett / cpsc392parlettpelleriti Goto Github PK

Insert below codes before ggplot to get the ideal parameters besides in the graph.

sim <- rbind(sim,data.frame(conames = c(NA,'A','E','I','O','U','Y','W'),
coefs = c(100,8.23,3.48,2.97,5.12,7.83,12.34,1.38),
model = 'Actual',
vowel = c(0,1,1,1,1,1,1,1)))

Insight : Linear is close, Lasso and Ridge are far below than expected. For Lasso, even the outliers are not close to approximations.

First time using Github,, thus adding the link to the code this suggestion is for.
https://github.com/cmparlettpelleriti/CPSC392ParlettPelleriti/blob/master/Extras/Linear%2C%20Ridge%2C%20and%20LASSO%20regression.ipynb