Pessoal, dei uma pesquisada e não consegui plotar o que desejo. Estou com os comandos. require(gdata) dados<-read.xls("multinacional.xls", encoding = "latin1") str(dados) attach(dados) library(doBy) require(lattice) xyplot(salario~escolaridade|sexo) summaryBy(salario~escolaridade|sexo,dados,FUN=c(mean)) escolaridade sexo salario.mean 1 médio Feminino 12.80000 2 médio Masculino 10.77500 3 pós-graduação Feminino 32.03333 4 pós-graduação Masculino 33.28000 5 superior Feminino 21.67000 6 superior Masculino 25.13478 Como plotar em um mesmo gráfico os gráficos de barras das médias dos três escolaridade que tenho por sexo um com cada cor? Tem como fazer isto de forma automática ou vou ter que criar os dados em um data frame para plotar? obrigado