> guppies<- read.csv(file.choose(), header=TRUE)
> guppies.mod=aov(Offspring~Feedings*Temperature), data=guppies)
Error: unexpected ',' in "guppies.mod=aov(Offspring~Feedings*Temperature),"
> guppies.mod=aov(Offspring~Feedings*Temperature, data=guppies)
> anova(guppies.mod)
Analysis of Variance Table

Response: Offspring
                     Df  Sum Sq Mean Sq F value    Pr(>F)
Feedings              1 1333.33 1333.33 55.4805 5.232e-09 ***
Temperature           2 1059.73  529.87 22.0479 3.926e-07 ***
Feedings:Temperature  2   41.67   20.83  0.8669    0.4282
Residuals            39  937.27   24.03
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1