[R] lattice

[David Winsemius]

On Jan 21, 2014, at 2:02 AM, Said Filahi wrote:

> hello
>
> If I have a a program
>
>
>
> trend <- read.table("txx.csv", header=T, sep=",")
> library(lattice)
> trellis.par.set(theme = canonical.theme("postscript", col=FALSE))
> trellis.par.set(list(fontsize=list(text=8),
>                 par.xlab.text=list(cex=1.5),
>                     add.text=list(cex=3.5),
>                     superpose.symbol=list(cex=1.0)))
> key <- simpleKey(levels(trend$Season), space = "right")
> key$text$cex <- 1.5
> print(
>     dotplot(Ville ~ Slope , data = trend, groups = Season,
>             key = key,
>             xlab = NULL,
>             aspect=0.8, layout = c(1,1), ylab=NULL)
> )
>
> and my dat det is
>
> Ville Season Slope significance  Alh DJF -0.3 0.02  Ben DJF 0.13  
> 0.7  Cas
> MAM 0.1 0.1  Ess JJA 0.4 0.03  Fes SON 0.9 0.02
> how can i change the color of symbole of slope value if the  
> significance is
> below 0.05

My early efforts were sabotaged by the groups argument. Removing it  
allowed the expected behavior to occur.


dotplot(Ville ~ Slope , data = trend,
              key = key, col=c("red","blue")[1+(trend$Slope < 0.05)],
              xlab = NULL,
              aspect=0.8, layout = c(1,1), ylab=NULL)

-- 
David Winsemius, MD
Alameda, CA, USA