Gráfico de Barras (04)

quinta-feira, 18 de outubro de 2007

Esse foi um exercício dado em sala de pelo Prof Adilson no segundo semestre de 2006.
Disciplina: Análise Gráfica.



CÓDIGOS PARA UTILIZAÇÃO NO SOFTWARE R
require(MASS)
data(cats)
attach(cats)
aptidao <- ifelse(Hwt >= 9.5, "apto", "inapto")
sex.t <- table(Sex, aptidao)
barplot(sex.t, beside = TRUE, legend.text = rownames(sex.t), col = c("white", "gray"))

0 Observações: