kling.augmented | R Documentation |
Augmented design of meadowfoam
data("kling.augmented")
A data frame with 68 observations on the following 7 variables.
plot
Plot number
gen
Genotype / Entry
name
Genotype name
block
Block, text
tsw
Thousand seed weight
row
Row ordinate
col
Column ordinate
An experiment with meadowfoam. Blocks are in one direction, serpentine layout. There are 50 new genotypes and 3 checks (C1=Ross, C2=OMF183, C3=Starlight). New genotypes have 1 rep, checks have 6 reps. The response variable is thousand seed weight.
Jennifer Kling, "Introduction to Augmented Experimental Design" https://plant-breeding-genomics.extension.org/introduction-to-augmented-experimental-design/ Accessed May 2022.
None
## Not run:
library(agridat)
data(kling.augmented)
dat <- kling.augmented
libs(desplot,lattice,lme4)
# Layout and yields
desplot(dat, tsw ~ col*row, text=name, cex=1.5)
# Mixed model, fixed blocks, random genotypes
m1 <- lmer(tsw ~ block + (1|name), data=dat)
ran1 <- ranef(m1, condVar=TRUE)
ran1
dotplot(ran1) # Caterpillar plot
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.