labestData: Biblioteca de Dados para Aprendizado de Estatística

Description Format Source Examples

Estudo da distribui<c3><a7><c3><a3>o do n<c3><ba>mero de plantas sadias de mandioca colhidas na <c3><a1>rea <c3><ba>til de uma parcela. Foram 30 parcelas onde avaliou-se o n<c3><ba>mero de mandiocas sadias em cada.

Um data.frame com 5 observa<c3><a7><c3><b5>es e 2 vari<c3><a1>veis, em que

plantas: N<c3><ba>mero de plantas sadias de mandioca.
freq: Frequ<c3><aa>ncia do n<c3><ba>mero de plantas sadias de mandioca.

Andrade, D. F., Ogliari, P. J. (2010). Estat<c3><ad>stica para as ci<c3><aa>ncias agr<c3><a1>rias e biol<c3><b3>gicas com no<c3><a7><c3><b5>es de experimenta<c3><a7><c3><a3>o (2nd ed.). Florian<c3><b3>polis, SC. Editora da UFSC. (Tabela 2.15, p<c3><a1>g. 89)

data(AndradeTb2.15)
str(AndradeTb2.15)

# Gr<c3><a1>fico de barras
with(AndradeTb2.15, {
    fr <- paste0("(", round(100 * freq / sum(freq)), "% )")
    bp <- barplot(freq,
                  names.arg = plantas,
                  col = "darkturquoise",
                  beside = TRUE,
                  ylim = extendrange(freq),
                  xlab = "N<c3><ba>mero de Plantas Colhidas Sadias",
                  ylab = "Porcentagem do N<c3><ba>mero de Parcelas")
    text(bp, freq + 0.3, labels = paste(freq, fr))
})

# Gr<c3><a1>fico de setores
with(AndradeTb2.15, {
    fr <- paste0("(", round(100 * freq / sum(freq)), "%)")
    pie(freq, labels = paste(plantas, "plantas\nsadias", fr),
        col = gray.colors(length(freq)))
})