Hi,
Have a look at this example in plot.zoo:
## Custom x axis labelling using a custom panel.
# 1. test data
z <- zoo(c(21, 34, 33, 41, 39, 38, 37, 28, 33, 40),
as.Date(c("1992-01-10", "1992-01-17", "1992-01-24", "1992-01-31",
"1992-02-07", "1992-02-14", "1992-02-21", "1992-02-28",
On Tue, Nov 13, 2012 at 5:30 PM, Vindoggy ! wrote:
>
> As an example data set:
>
> set.seed(1)
> z.Date <- as.Date(paste(2003, 02, c(1, 3, 7, 9, 14), sep = "-"))
> z <- zoo(cbind(left = rnorm(5), right = rnorm(5, sd = 0.2)), z.Date)
>
> tt<-time(z)
>
>
>
> fmt<-"%b-%d"
>
> labs<-format(tt,fmt)
> p
2 matches
Mail list logo
