Exam4.3.1 {eda4treeR}

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(s)

1. Muhammad Yaseen ([e-mail])

2. Sami Ullah ([e-mail])

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)
library(supernova)

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)