
Dyestuff
data frame provides the yield of dyestuff
(Naphthalene Black 12B) from 5 different preparations from each of 6
different batchs of an intermediate product (H-acid). The
Dyestuff2
data were generated data in the same structure but
with a large residual variance relative to the
batch variance.data(Dyestuff)
G.E.P. Box and G.C. Tiao, Bayesian Inference in Statistical Analysis, Addison-Wesley, (1973), section 5.1.2
Dyestuff
data are described in Davies and Goldsmith (1972)
as coming from
The Dyestuff2
data are described in Box and Tiao (1973) as
illustrating
str(Dyestuff)
dotplot(reorder(Batch, Yield) ~ Yield, Dyestuff,
ylab = "Batch", jitter.y = TRUE, aspect = 0.3,
type = c("p", "a"))
dotplot(reorder(Batch, Yield) ~ Yield, Dyestuff2,
ylab = "Batch", jitter.y = TRUE, aspect = 0.3,
type = c("p", "a"))
(fm1 <- lmer(Yield ~ 1|Batch, Dyestuff))
(fm2 <- lmer(Yield ~ 1|Batch, Dyestuff2))
Run the code above in your browser using DataLab