I\'m having difficulty with a few outliers making the color scale useless.
My data has a Length variable that is based in a range, but will usually have a few much large
From my comment, see ?cut
x$colors <- cut(x$Length, breaks=c(0,500,1000,1300,max(x$Length))) g <- ggplot(data=x,aes(x=date,y=factor(stateabbr),color=colors)) + geom_point() + opts(title="Date and State") + xlab("Date") + ylab("State")