Atividade - Teste de Turkey e Gráfico Anova - 2023-2

Atividade 01 de novembro Uma pesquisa foi realizada para avaliar o teor de sacarose, em diferentes variedades de cana de açúcar para a produção de destilado. Na indústria canavieira, sabe-se que quanto maior o teor de sacarose, melhor é a qualidade do produto. Em uma fazenda experimental, selecionaram-se, aleatoriamente, pés de cana das três variedades (A, B e C) cultivadas nas mesmas condições de clima e qualidade do solo, garantindo a homogeneidade das unidades experimentais. A tabela abaixo, descreve os teores de sacarose de cada pé de cana das três variedades. Variedade Teor de sacarose, em % A 10 9.5 9.5 11 12 8 10 10 9 9 B 11 13 12 11 13 12 11 10 12 C 14 17 15 15 16 14 17 a) Construa o quadro ANOVA e verifique se há diferença do teor médio de sacarose entre as variedades por meio de um teste de hipóteses, com n.s. de 0,05. b) Se houver diferença, faça o teste de Tukey para comparação dos teores médios entre as variedades. a) Sejam as hipóteses: H0: não diferença entre as médias do teor médio de sacarose entre as variedades H1: há alguma diferença entre as médias do teor médio de sacarose entre as variedades Temos que valor-p < 0,05, logo rejeita-se a hipótese nula ao nível de significância de 5%. Portanto, há diferença no teor médio de sacarose entre as variedades. Devemos realizar o teste Tukey para identificar onde estão essas diferenças. b) O teste Tukey mostra que, ao nível de significância de 5%, o teor médio de sacarose das variedades é significativamente diferente entre todos os pares. A variedade C é a que apresenta maior teor médio de sacarose, seguido de B e A. Código R: a <- c(10,9.5,9.5,11,12,8,10,10,9,9) b <- c(11,13,12,11,13,12,11,10,12) c <- c(14,17,15,15,15,16,14,17) resp <- c(a,b,c) trat <- rep(c('A','B','C'), c(10,9,8)) ExpDes.pt::dic(trat=trat, resp=resp) # Sem USAR o ExpDes.pt aov <- aov(resp~trat) summary(aov) stats::TukeyHSD(aov)