#===============================================================================
#. Título: Análise de variância experimentos
#. Curso : CET076 - Metodologia e Estatística Experimental - Agronomia
# Autor : José Cláudio Faria
# Data  : 19/10/2022 22:39:57
#===============================================================================
# Objetivos
#===============================================================================
# - Exemplificar, através do R, as análises e determinações numéricas do curso
#   de MEE, referentes a análise de variância via pacote: easyanova
#===============================================================================

#. Package [easyanova]: Analysis of variance in factorial and split plot
require(easyanova)

#. Double factorial
#.. completely randomized design
data(data5)
an_1 <- ea2(data5,
            design=1)
an_1

#.. randomized block design
data(data6)
an_2 <- ea2(data6,
            design=2)
an_2

#. Triple factorial
#.. completely randomized design
data(data9)
an_3 <- ea2(data9[,-4],
            design=7)
an_3[1]

#. Split plot
#.. completely randomized design
data(data7)
an_4 <- ea2(data7,
            design=4)
an_4

#.. randomized block design
data(data8)
an_5 <- ea2(data8,
            design=5)
an_5

#. Hierarchical blocks
# Ramalho et al. (2005)
data(data18)
an_6 <- ea2(data18,
            design=11)
an_6

#. Hierarchical latin squares
# Sampaio (2010)
data(data19)

#.. hierarchical rows
an_7 <- ea2(data19,
            design=12)
an_7

#.. hierarchical rows and columns
an_8 <- ea2(data19,
            design=13)
an_8