[R] Lattice zoo plot: no x ticks on first panel

[Bengoechea Bartolomé Enrique (SIES 73)]

With some tweaking, this has fully solved the issue. Many thanks Gabor!!

Regards,

Enrique

> -----Original Message-----
> From: Gabor Grothendieck [mailto:ggrothendieck at gmail.com] 
> Sent: martes, 27 de mayo de 2008 16:07
> To: Bengoechea Bartolomé Enrique (SIES 73)
> Cc: r-help at r-project.org
> Subject: Re: [R] Lattice zoo plot: no x ticks on first panel
> 
> Hi, Try this. Regards.
> 
> 
> library(zoo)
> library(lattice)
> 
> my.axis <- function(side, ...) if (side != "top") 
> axis.default(side, ...)
> 
> my.panel <- function(..., side) {
> 	panel.axis(outside = TRUE, lab = FALSE)
> 	panel.plot.default(...)
> }
> 
> my.par = list(clip = list(panel = "off", strip = "off"))
> 
> set.seed(1)
> z <- zoo(cbind(a = 1:5, b = 11:15, c = 21:25) + rnorm(5)) 
> xyplot(z, between = list(x = 1.2, y = 1), par.settings = my.par,
> 	axis = my.axis, panel = my.panel)
>