Re: [Rd] patch proposal for plot.ts

From: Martin Maechler <maechler_at_stat.math.ethz.ch>
Date: Sat, 24 Nov 2007 14:45:22 +0100

>>>>> Antonio, Fabio Di Narzo <antonio.fabio_at_gmail.com> >>>>> on Sat, 24 Nov 2007 12:35:25 +0100 writes:

> Hi all. Currently, if you try:

    >> lag.plot(1:10)

> you get superposed labels '1' and '10'. Things go worse in
> more extreme cases:

> x <- ts(1:10)
> x1 <- lag(x, 4)
> plot(x1, x)

> This is due to a mistake in plot.ts.

I agree, It seems pretty clear to you have uncovered a - somewaht rarely tirggered bug there...

> My suggestion is the following
> really minimal patch to plot.ts:

     @@ -530,7 +530,7 @@ plot.ts <-
		     text(xy, labels =
			  if(is.character(xy.labels)) xy.labels
			  else if(all(tsp(x) == tsp(y))) formatC(time(x), width = 1)
     -                    else seq_along(x),
     +                    else seq_along(xy$x),
			  col = col, cex = cex)
		 if(xy.lines)
		     lines(xy, col = col, lty = lty, lwd = lwd,

>      Best regards,
>      Antonio.

Thank you very much, Antonio, for the nice compact report and patch!

This will be fixed in R 2.7.0 and maybe even in 2.6.1

Martin Maechler, ETH Zurich



R-devel_at_r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel Received on Sat 24 Nov 2007 - 13:48:06 GMT

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.2.0, at Sat 24 Nov 2007 - 18:30:37 GMT.

Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-devel. Please read the posting guide before posting to the list.