Aproveitando a pergunta, como eu deixo o fundo branco ali onde ele fala o nome do nível do grupo no titulo de cada gráfico? Em 6 de novembro de 2011 17:08, Augusto Ribas <ribas.aca@gmail.com> escreveu:

Ola galera. Estou aqui sofrendo com o xyplot(). Eu estou tentando fazer um gráfico a partir de 3 variáveis, 2 categóricas e uma numérica. Gostaria de um xyplot que aparecesse tanto as "bolinhas" que são meus dados como um risco com a média para cada grupo de amostras. Segue um exemplo que é exatamente o que quero fazer, mas usando o xyplot para partir ele em 2 gráficos uma para cada grupo. Acredito que tenho que usar o argumento panel, nossa mas não entendo muito bem a logica de como funciona para fazer funções pra usar no panel, e as que tem não consegui que fizessem o que quero. Se alguém puder dar uma mãozinha.

#Começa aqui o exemplo #Abrindo um exemplo require(lattice) demo4<-read.csv("http://www.ats.ucla.edu/stat/data/demo4.csv") Convertendo Variaveis em Tempo demo4 <- within(demo4, {  group <- factor(group)  time <- factor(time)  id <- factor(id) }) par(cex = 1)

# Gráfico with(demo4, interaction.plot(time, group, pulse,  ylim = c(0, 60), lty = c(1, 12), lwd = 3,  ylab = "mean of pulse", xlab = "time", trace.label = "group")) points(as.numeric(demo4$time),demo4$pulse,pch=rep(c(1,16),each=12))

# Gráfico com xyplot xyplot(pulse~time|group,data=demo4,layout=c(2,1),pch=16,col="black",cex=1.3) #Então aqui que eu gostaria so de uma linha ligando as medias pra cada nível do tempo no dois níveis do group #Usei alguns dos panel pronto e tentei fazer um mas não deu muito certo

Bem é isso, agradeço a atenção desde ja :)

-- Grato Augusto C. A. Ribas

Site Pessoal: http://augustoribas.heliohost.org Lattes: http://lattes.cnpq.br/7355685961127056

-- Grato Augusto C. A. Ribas Site Pessoal: http://augustoribas.heliohost.org Lattes: http://lattes.cnpq.br/7355685961127056