[R-es] Colores, leyenda

[jose cebrian]

Muy buenas a todos,
 estoy haciendo un grafico de barras, barplot y tengo el siguiente problemilla.
Tengo un vector leyenda y otro de colores

colores<-c("sienna4", "orange", "red", "steelblue") 
leyenda<-c("2007", "2008","2009","2010")

Adjunto archivo con el grafico que me sale, 
y el problema es el siguiente:
los colores del vector no se corresponden con los de la leyenda, no se como los asigna, pero parece un poco al azar.
¿como puedo hacer para asegurarme que cada color de la leyenda se corresponderá con un año determinado?
Gracias 
El script del grafico es:



barplot(table(datos1$año,datos$rango), beside=T,  legend.text=leyenda,args.legend=list(x="topleft"),col=colores)
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20120203/f65a6cd8/attachment.html>
------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: barplot.pdf
Type: application/pdf
Size: 13379 bytes
Desc: no disponible
URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20120203/f65a6cd8/attachment.pdf>