labels

Tenho uma trama onde o eixo dos x é um factor cujos rótulos são longos. Embora provavelmente não seja uma visualização ... cter(diamonds$cut)) q <- qplot(cut,carat,data=diamonds,geom="boxplot") q + opts(axis.text.x=theme_text(angle=-90))

Eu gostaria de criar uma legenda colorbar para um mapa de calor, de modo que as etiquetas estão no centro de cada cor d ... eu gostaria de gerar uma barra de legend que tem as quatro cores e para cada cor, uma etiqueta no seu centro: 0,1,2,3,>4