I figured out the answer. Since I have both the predicted and actual values, I simply need to call the lm function, and summary to see R^2 which matches what MOE provided.
myline.fit <-lm( y~x) summary(myline.fit) -- View this message in context: http://r.789695.n4.nabble.com/R2-function-from-PLS-to-use-a-model-on-test-data-tp2281426p2282684.html Sent from the R help mailing list archive at Nabble.com. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
