Description Format Source Examples
Em um estudo do comportamento de uma planta t<c3><ad>pica de dunas, a Hydrocotille sp, quanto ao seu desenvolvimento, mediu-se o tamanho do pec<c3><ad>olo, em cent<c3><ad>metros, em duas <c3><a1>reas: seca e <c3><ba>mida. Selecionou-se de cada uma dessas <c3><a1>reas amostras aleat<c3><b3>rias de plantas e mediu-se o tamanho dos pec<c3><ad>olos.
Um data.frame
com 69 observa<c3><a7><c3><b5>es e 2 vari<c3><a1>veis, em que
area
Fator de 2 n<c3><ad>veis que representa a caracter<c3><ad>stica da <c3><a1>rea onde a planta se desenvolveu.
tamanho
Tamanho do pec<c3><ad>olo, em cent<c3><ad>metros.
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.45, p<c3><a1>g. 148)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | data(AndradeTb2.45)
str(AndradeTb2.45)
# Medidas resumo para cada <c3><a1>rea
with(AndradeTb2.45, tapply(tamanho, area, summary))
# Histogramas sobrepostos
hts <- with(AndradeTb2.45, tapply(tamanho, area, hist, plot = FALSE))
plot(0, 0, type = "n",
xlim = extendrange(AndradeTb2.45$tamanho),
ylim = range(sapply(hts, function(h) range(h$counts))),
xlab = "Tamanho do Pec<c3><ad>olo (em cm)",
ylab = "Frequ<c3><aa>ncia")
cols <- c("gray70", "gray30")
lapply(1:length(hts), function(i) {
plot(hts[[i]], add = TRUE, col = cols[i], labels = TRUE,
border = "white")
})
legend("top", title = "<c3><81>rea", legend = names(hts),
fill = cols, bty = "n", border = "white")
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.