eda4treeR (version 1.1.0)

Exam4.3.1: Example 4.3.1 from Experimental Design and Analysis for Tree Improvement

Description

Exam4.3.1 presents the germination count data for 4 Pre-Treatments and 6 Seedlots.

Author

1. Muhammad Yaseen ()

2. Sami Ullah ()

References

1. E.R. Williams, C.E. Harwood and A.C. Matheson (2023). Experimental Design and Analysis for Tree Improvement. CSIRO Publishing (https://www.publish.csiro.au/book/3145/).

See Also

DataExam4.3.1

Examples

library(car)
library(dae)
library(dplyr)
library(emmeans)
library(ggplot2)
library(lmerTest)
library(magrittr)
library(predictmeans)

data(DataExam4.3)

# Pg. 57
fm4.4    <-
  aov(
      formula = percent ~ repl + treat*seedlot
    , data    = DataExam4.3 %>%
                 filter(treat != "control")
     )

 # Pg. 57
 anova(fm4.4)
 model.tables(x = fm4.4, type = "means", se = TRUE)

 emmeans(object = fm4.4, specs = ~ treat)
 emmeans(object = fm4.4, specs = ~ seedlot)
 emmeans(object = fm4.4, specs = ~ treat * seedlot)