HW3 - HW3.html setwd"~/Desktop/Econ 404 oj =...

This preview shows page 1 - 3 out of 6 pages.

4/19/2017 HW3.html 1/6 setwd("~/Desktop/Econ 404") oj = read.csv("oj.csv") library (ggplot2) names(oj) ## [1] "store" "brand" "week" "logmove" "feat" "price" ## [7] "AGE60" "EDUC" "ETHNIC" "INCOME" "HHLARGE" "WORKWOM" ## [13] "HVAL150" "SSTRDIST" "SSTRVOL" "CPDIST5" "CPWVOL5" reg=lm(formula = logmove ~ log(price) * brand * feat + AGE60 + EDUC + ETHNIC + INCOME + HHLARGE + WORKWOM + HVAL150 + SSTRDIST + SSTRVOL + CPDIST5 + CPWVOL5, data = oj) summary(reg)
Image of page 1

Subscribe to view the full document.

4/19/2017 HW3.html 2/6 ## ## Call: ## lm(formula = logmove ~ log(price) * brand * feat + AGE60 + EDUC + ## ETHNIC + INCOME + HHLARGE + WORKWOM + HVAL150 + SSTRDIST + ## SSTRVOL + CPDIST5 + CPWVOL5, data = oj) ## ## Residuals: ## Min 1Q Median 3Q Max ## -5.2004 -0.3922 -0.0049 0.3786 2.9884 ## ## Coefficients: ## Estimate Std. Error t value Pr(>|t|) ## (Intercept) 13.143435 0.329622 39.874 < 2e-16 *** ## log(price) -2.854302 0.036816 -77.528 < 2e-16 *** ## brandminute.maid 0.092348 0.044158 2.091 0.03651 * ## brandtropicana 0.772280 0.048102 16.055 < 2e-16 *** ## feat 1.055010 0.036034 29.278 < 2e-16 *** ## AGE60 2.044239 0.127506 16.032 < 2e-16 *** ## EDUC 0.955931 0.101486 9.419 < 2e-16 *** ## ETHNIC 0.643102 0.037229 17.274 < 2e-16 *** ## INCOME -0.279937 0.033300 -8.406 < 2e-16 *** ## HHLARGE -0.920092 0.230509 -3.992 6.58e-05 *** ## WORKWOM -0.424559 0.146824 -2.892 0.00384 ** ## HVAL150 0.357561 0.041803 8.554 < 2e-16 *** ## SSTRDIST -0.019979 0.001465 -13.634 < 2e-16 *** ## SSTRVOL -0.055948 0.009768 -5.728 1.03e-08 *** ## CPDIST5 0.064160 0.006289 10.203 < 2e-16 *** ## CPWVOL5 -0.500272 0.025703 -19.464 < 2e-16 *** ## log(price):brandminute.maid 0.753984 0.058086 12.981 < 2e-16 *** ## log(price):brandtropicana 0.713983 0.053736 13.287 < 2e-16 *** ## log(price):feat -0.405049 0.070053 -5.782 7.45e-09 *** ## brandminute.maid:feat 1.131698 0.077495 14.603 < 2e-16 *** ## brandtropicana:feat 0.746656 0.093353 7.998 1.31e-15 *** ## log(price):brandminute.maid:feat -1.079118 0.115559 -9.338 < 2e-16 *** ## log(price):brandtropicana:feat -0.989109 0.117302 -8.432 < 2e-16 *** ## --- ## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 ## ## Residual standard error: 0.6568 on 28924 degrees of freedom ## Multiple R-squared: 0.5851, Adjusted R-squared: 0.5848 ## F-statistic: 1854 on 22 and 28924 DF, p-value: < 2.2e-16 1b t>2 : AGE60 EDUC ETHNIC HVAL150 CPDIST5 reg1=lm(formula = logmove ~ log(price) * brand * feat, data=oj) summary(reg1)
Image of page 2
Image of page 3

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