finalrev - R Material for Final Exam Review > data.acid

Info iconThis preview shows pages 1–3. Sign up to view the full content.

View Full Document Right Arrow Icon
R Material for Final Exam Review > data.acid <- read.table(file=" http://www.stat.ufl.edu/~rrandles/sta4211/Rclassnotes/data/acid.txt ",col.na mes=c("acid","plant","leaf","rep")) > attach(data.acid) > data.acid acid plant leaf rep 1 11.2 1 1 1 2 11.6 1 1 2 3 12.0 1 1 3 4 16.5 1 2 1 5 16.8 1 2 2 6 16.1 1 2 3 7 18.3 1 3 1 8 18.7 1 3 2 9 19.0 1 3 3 10 14.1 2 1 1 11 13.8 2 1 2 12 14.2 2 1 3 13 19.0 2 2 1 14 18.5 2 2 2 15 18.2 2 2 3 16 11.9 2 3 1 17 12.4 2 3 2 18 12.0 2 3 3 19 15.3 3 1 1 20 15.9 3 1 2 21 16.0 3 1 3 22 19.5 3 2 1 23 20.1 3 2 2 24 19.3 3 2 3 25 16.5 3 3 1 26 17.2 3 3 2 27 16.9 3 3 3 28 7.3 4 1 1 29 7.8 4 1 2 30 7.0 4 1 3 31 8.9 4 2 1 32 9.4 4 2 2 33 9.3 4 2 3 34 11.3 4 3 1 35 10.9 4 3 2 36 10.5 4 3 3 > fplant <- factor(plant) > fleaf <- factor(leaf) > model1 <- aov(acid~fplant + fleaf) > summary(model1) Df Sum Sq Mean Sq F value Pr(>F) fplant 3 343.18 114.393 33.608 1.012e-09 *** fleaf 2 88.38 44.188 12.982 8.672e-05 *** Residuals 30 102.11 3.404 --- Signif. Codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Background image of page 1

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

View Full DocumentRight Arrow Icon
> model2 <- aov(acid~fplant + fleaf +fplant:fleaf) > summary(model2) Df Sum Sq Mean Sq F value Pr(>F) fplant 3 343.18 114.393 905.09 < 2.2e-16 *** fleaf 2 88.38
Background image of page 2
Image of page 3
This is the end of the preview. Sign up to access the rest of the document.

This note was uploaded on 07/08/2011 for the course STA 4211 taught by Professor Randles during the Spring '08 term at University of Florida.

Page1 / 4

finalrev - R Material for Final Exam Review > data.acid

This preview shows document pages 1 - 3. Sign up to view the full document.

View Full Document Right Arrow Icon
Ask a homework question - tutors are online