Rforch09 - R Material for Chapter 09 > attach(bill.data >...

Info icon This preview shows pages 1–2. Sign up to view the full content.

View Full Document Right Arrow Icon
R Material for Chapter 09 > attach(bill.data) > bill.data bill income persons sqft 1 228 3220 2 1160 ## our data 2 156 2750 1 1080 3 648 3620 2 1720 4 528 3940 1 1840 5 552 4510 3 2240 6 636 3990 4 2190 7 444 2430 1 830 8 144 3070 1 1150 9 744 3750 2 1570 10 1104 4790 5 2660 11 204 2490 1 900 12 420 3600 3 1680 13 876 5370 1 2550 14 840 3180 7 1770 15 876 5910 2 2960 16 276 320 2 1190 17 1236 5920 3 3130 18 372 3520 2 1560 19 276 3720 1 1510 20 450 4840 1 2190 All-Subsets Selection of a Model – Requires a Special Library > library(leaps) ## loads the special library of functions ## SEE THE END OF THIS DOCUMENT > subs <- regsubsets(bill~.,data=bill.data,nbest=3,method=c("exhaustive")) ## (response variable~., name of data set, number of best subsets per model size, ## “exhaustive” means all-subsets > summary(subs) Subset selection object Call: regsubsets.formula(bill ~ ., data = bill.data, nbest = 3, method = c("exhaustive")) 3 Variables (and intercept) Forced in Forced out income FALSE FALSE persons FALSE FALSE sqft FALSE FALSE 3 subsets of each size up to 3 Selection Algorithm: exhaustive income persons sqft 1 ( 1 ) " " " " "*" ## orders the one variable models by R^2 1 ( 2 ) "*" " " " " 1 ( 3 ) " " "*" " " 2 ( 1 ) " " "*" "*" ## orders the two variable models by R^2 2 ( 2 ) "*" " " "*" 2 ( 3 ) "*" "*" " " 3 ( 1 ) "*" "*" "*" ## the only three variable model > result1 <- with(bill.data,leaps(cbind(income, persons,sqft),bill,method="r2", nbest=3))
Image of page 1

Info iconThis preview has intentionally blurred sections. Sign up to view the full version.

View Full Document Right Arrow Icon
Image of page 2
This is the end of the preview. Sign up to access the rest of the document.

{[ snackBarMessage ]}

What students are saying

  • Left Quote Icon

    As a current student on this bumpy collegiate pathway, I stumbled upon Course Hero, where I can find study resources for nearly all my courses, get online help from tutors 24/7, and even share my old projects, papers, and lecture notes with other students.

    Student Picture

    Kiran Temple University Fox School of Business ‘17, Course Hero Intern

  • Left Quote Icon

    I cannot even describe how much Course Hero helped me this summer. It’s truly become something I can always rely on and help me. In the end, I was not only able to survive summer classes, but I was able to thrive thanks to Course Hero.

    Student Picture

    Dana University of Pennsylvania ‘17, Course Hero Intern

  • Left Quote Icon

    The ability to access any university’s resources through Course Hero proved invaluable in my case. I was behind on Tulane coursework and actually used UCLA’s materials to help me move forward and get everything together on time.

    Student Picture

    Jill Tulane University ‘16, Course Hero Intern