powered by
Each of 20 tasters each assessed three out of the four varieties. The experiment was conducted according to a balanced incomplete block design.
data(appletaste)
A data frame with 60 observations on the following 3 variables.
a numeric vector
a factor with levels a b c d e f g h i j k l m n o p q r s t
a
b
c
d
e
f
g
h
i
j
k
l
m
n
o
p
q
r
s
t
a factor with levels 298 493 649 937
298
493
649
937
# NOT RUN { data(appletaste) appletaste.aov <- aov(aftertaste ~ panelist + product, data=appletaste) termplot(appletaste.aov) # }
Run the code above in your browser using DataLab