Nothing
inst/snippet/seatpos05.R
In fastR2: Foundations and Applications of Statistics Using R (2nd Edition)
pc <- with(seatpos,
princomp(cbind(HtShoes, Ht, Seated, Arm, Thigh, Leg),
scores = TRUE))
msummary(pc, loadings = TRUE)
seatpos.lmpc <-lm(hipcenter ~ Age + Weight + pc$scores[, 1], data = seatpos)
msummary(seatpos.lmpc)
faraway::vif(seatpos.lmpc)
Try the fastR2 package in your browser
Any scripts or data that you put into this service are public.
fastR2 documentation built on Nov. 9, 2023, 9:06 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
pc <- with(seatpos,
princomp(cbind(HtShoes, Ht, Seated, Arm, Thigh, Leg),
scores = TRUE))
msummary(pc, loadings = TRUE)
seatpos.lmpc <-lm(hipcenter ~ Age + Weight + pc$scores[, 1], data = seatpos)
msummary(seatpos.lmpc)
faraway::vif(seatpos.lmpc)
Try the fastR2 package in your browser
Any scripts or data that you put into this service are public.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.