Warum geben Excel und R verschiedene ANOVA-Ausgaben?

Question

Ich mache eine einfache ANOVA in R, unten gezeigt.

x1 <- c(180,45,45,200,65,150,380,250,0,0,320,100,80,0,280,20,60,300,210,0,20,0,0,260,220) 
x2 <- c(0,100,120,0,40,200,20,240,80,420,0,0,0,220,160,40,180,0,0,40,0,20,100,0,120) 
dat = data.frame(cbind(x1,x2)) 
colnames(dat) <- c("Column1","Column2") 
dat$Column2<-as.factor(dat$Column2) 
anova(lm(Column1~Column2,data=dat)) 

Dies ist die Ausgabe, die ich bekomme.

Analysis of Variance Table 

Response: Column1 
      Df Sum Sq Mean Sq F value Pr(>F) 
Column2 11 181842 16531 1.2339 0.3548 
Residuals 13 174164 13397    

Allerdings, wenn ich die gleiche ANOVA in Excel durchführen "ANOVA: Einzel Factor" erhalte ich die folgenden Ergebnisse.

Answer 1

Sie benötigen einen Datensatz haben, wo die beiden Spalten Werte und Gruppen sind:

> dat <- stack(data.frame(x1,x2)) 
> colnames(dat) <- c("Column1","Column2") 
> dat$Column2<-as.factor(dat$Column2) 
> anova(lm(Column1~Column2,data=dat)) 
Analysis of Variance Table 

Response: Column1 
      Df Sum Sq Mean Sq F value Pr(>F) 
Column2 1 23545 23544 1.8204 0.1836 
Residuals 48 620806 12934