[R-br] Ajuda com argumento panel em um gráfico com a função xyplot{lattice}.

[Augusto Ribas]

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 em 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