Skip to content
Prev 3983 / 15274 Next

Chart formats

In this case the following gives years:

plot(as.zoo(GS[,1]))

and if variations of it do not, you can force it:

plot(as.zoo(GS[,1]), xaxt = "n")
years <- as.Date(unique(cut(time(GS), "year")))
axis(1, at = years, lab = format(years, "%Y"))
On Fri, May 1, 2009 at 11:10 AM, Heiko Mayer <Heiko-Mayer at gmx.de> wrote: