Dataset to illustrate one-way and Two-way analysis of variance
Usage
data(senso)
Format
Dataset with 45 rows and 3 columns:
Score, Product and Day
Examples
## Example of 2-way analysis of variance
data(senso)
res <- AovSum (Score~ Product + Day, data=senso)
res
## Example of 2-way analysis of variance with interaction
data(senso)
res2 <- AovSum (Score~ Product + Day + Product : Day, data=senso)
res2
Results
R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
> library(FactoMineR)
> png(filename="/home/ddbj/snapshot/RGM3/R_CC/result/FactoMineR/senso.Rd_%03d_medium.png", width=480, height=480)
> ### Name: senso
> ### Title: senso
> ### Aliases: senso
> ### Keywords: datasets
>
> ### ** Examples
>
> ## Example of 2-way analysis of variance
> data(senso)
> res <- AovSum (Score~ Product + Day, data=senso)
> res
Ftest
SS df MS F value Pr(>F)
Product 2.0278 2 1.0139 3.4428 0.04148 *
Day 25.4725 1 25.4725 86.4959 1.18e-11 ***
Residuals 12.0742 41 0.2945
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
Ttest
Estimate Std. Error t value Pr(>|t|)
(Intercept) 4.590736 0.081464 56.3528 < 2e-16 ***
Product - 1 0.237057 0.120675 1.9644 0.05628 .
Product - 2 -0.284745 0.114663 -2.4833 0.01720 *
Product - 3 0.047688 0.118456 0.4026 0.68935
Day - 1 0.803378 0.086382 9.3003 < 2e-16 ***
Day - 2 -0.803378 0.086382 -9.3003 < 2e-16 ***
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
>
> ## Example of 2-way analysis of variance with interaction
> data(senso)
> res2 <- AovSum (Score~ Product + Day + Product : Day, data=senso)
> res2
Ftest
SS df MS F value Pr(>F)
Product 1.7773 2 0.8886 2.9876 0.06206 .
Day 25.8418 1 25.8418 86.8787 1.804e-11 ***
Product:Day 0.4738 2 0.2369 0.7964 0.45813
Residuals 11.6004 39 0.2974
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
Ttest
Estimate Std. Error t value Pr(>|t|)
(Intercept) 4.5842929 0.0871239 52.6181 < 2e-16 ***
Product - 1 0.2557071 0.1225836 2.0860 0.04357 *
Product - 2 -0.2509596 0.1203159 -2.0858 0.04358 *
Product - 3 -0.0047475 0.1266521 -0.0375 0.97029
Day - 1 0.8120707 0.0871239 9.3209 < 2e-16 ***
Day - 2 -0.8120707 0.0871239 -9.3209 < 2e-16 ***
Product - 1 : Day - 1 0.0279293 0.1225836 0.2278 0.82096
Product - 2 : Day - 1 -0.1454040 0.1203159 -1.2085 0.23412
Product - 3 : Day - 1 0.1174747 0.1266521 0.9275 0.35935
Product - 1 : Day - 2 -0.0279293 0.1225836 -0.2278 0.82096
Product - 2 : Day - 2 0.1454040 0.1203159 1.2085 0.23412
Product - 3 : Day - 2 -0.1174747 0.1266521 -0.9275 0.35935
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
>
>
>
>
>
>
> dev.off()
null device
1
>