Dear Hadley,
You are a machine! Its way past late you should be relaxing man ;)

Here is what I hacked together. My question was how to pass in the colour
used to fill the dot/legend and the label for the legend entries.
 test <- qplot(x,y, data=some.data, size=chop(variance, n=4),
colour="cornflowerblue", xlim=c(-20,20), main="title", xlab="label",
ylab="label") + geom_jitter(aes(colour="gray15", x=col1, xjitter=1, yjitter=
0.01)) + geom_jitter(aes(colour="gray20", x=col2, xjitter=1, yjitter=0.01))
+ geom_jitter(aes(colour="gray25", x=col3, xjitter=1, yjitter=0.01)) +
geom_jitter(aes(colour="gray30", x=col4, xjitter=1, yjitter=0.01)) +
scale_colour_identity(labels=c("number1","number2","number3","number4","number5"),
grob="tile", name="Legend title")

Because I want to be able to set the colors based on properties of my data,
while still meaningfully name the legend entry.

I did find another example, but I can't seem to find it atm, but it did
assign labels from the underlying dataframe...which is better than hard
coding them, but at this point its good enuf!

In case anyone else would like to know, I tried some of the following named
colors and they work (hence the 'cornflowerblue' above :P)
http://www.pitt.edu/~nisg/cis/web/cgi/rgb.html.

emilio

	[[alternative HTML version deleted]]

