colour scale for POSIXlt times in 0.9.2

[Ronan Le Hy]

Hello,

I just upgraded from ggplot2 0.9.1 to 0.9.2.1. The way POSIXlt times are mapped to colours has changed, and I don't know how to get back to the old behaviour.

0.9.1:

 The colour scale is a continuous gradient (dark to light blue).

 png : http://ubuntuone.com/1sUwIK5ttAW6wf471g9ZdI

0.9.2/0.9.2.1:

 The colour scale is discretized.

 png : http://ubuntuone.com/7BbACLrxL9oHvsOjF8FBSy

Is there a way to get back the gradient scale in 0.9.2.1? (I did try to search the changelog and the mailing list, to no avail. Pointers to previous discussions would of course be appreciated.)

Here is my code:

library(reshape)

library(ggplot2)

dat <- mutate(data.frame(x=seq(0,10,0.1)),

              y = sin(x),

              t = as.POSIXlt(sprintf("2012-07-18 20:%d:%f", as.integer(x), x)))

summary(dat)

ggplot.version <- sessionInfo("ggplot2")$otherPkgs$ggplot2$Version

cat("this is ggplot2 version", ggplot.version, "\n")

p <- ggplot(dat) + geom_point(aes(x=x, y=y, color=t))

ggsave(sprintf("time-color-%s.png", ggplot.version))

-- 

Ronan

[Ronan Le Hy]

2012/11/6 Ronan Le Hy <ronan...@gmail.com>

I just upgraded from ggplot2 0.9.1 to 0.9.2.1. The way POSIXlt times are mapped to colours has changed, and I don't know how to get back to the old behaviour.

[...]

Here is my code:

library(reshape)

library(ggplot2)

dat <- mutate(data.frame(x=seq(0,10,0.1)),

              y = sin(x),

              t = as.POSIXlt(sprintf("2012-07-18 20:%d:%f", as.integer(x), x)))

summary(dat)

ggplot.version <- sessionInfo("ggplot2")$otherPkgs$ggplot2$Version

cat("this is ggplot2 version", ggplot.version, "\n")

p <- ggplot(dat) + geom_point(aes(x=x, y=y, color=t))

ggsave(sprintf("time-color-%s.png", ggplot.version))

Sorry, these two last lines should be:

[Ista Zahn]

Hi,

Not sure if this is the recommended way, but

library(lubridate)
ggplot(dat) + geom_point(aes(x=x, y=y, color=second(t)))

seems to work.

Best,
Ista

> --
> You received this message because you are subscribed to the ggplot2 mailing
> list.
> Please provide a reproducible example:
> https://github.com/hadley/devtools/wiki/Reproducibility
>
> To post: email ggp...@googlegroups.com
> To unsubscribe: email ggplot2+u...@googlegroups.com
> More options: http://groups.google.com/group/ggplot2

[Ronan Le Hy]

2012/11/6 Ista Zahn <ista...@gmail.com>

> Not sure if this is the recommended way, but
> library(lubridate)
> ggplot(dat) + geom_point(aes(x=x, y=y, color=second(t)))
> seems to work.

Thanks.

It does fix the color scale, but then the legend is unusable (it says
"second(t)" instead of "t", and the values are not proper times).

--
Ronan

[Hadley Wickham]

> dat <- mutate(data.frame(x=seq(0,10,0.1)),
> y = sin(x),
> t = as.POSIXlt(sprintf("2012-07-18 20:%d:%f", as.integer(x),
> x)))

I wouldn't recommend putting POSIXlt in a dataframe - use POSIXct.

Hadley

--
RStudio / Rice University
http://had.co.nz/

[Winston Chang]

Hm, that looks like a bug. I've filed it here:

  https://github.com/hadley/ggplot2/issues/718

-Winston

-- 

Ronan

--