# NOT RUN {
plot(1:9, rep(1,9), pch=16, cex=10, col=mcri(0:8))
text(1:9, rep(1.1,9), c('blue', 'orange', 'green', 'magenta',
'cyan', 'red', 'violet', 'darkblue', 'darkred'),
col=mcri(0:8), cex=1.5, font=2)
# }
Run the code above in your browser using DataLab