View source for File:Rpalette.png

== Summary ==
<syntaxhighlight lang='rsplus'>
pal <- palette()
# [1] "black"   "#DF536B" "#61D04F" "#2297E6" "#28E2E5" "#CD0BBC" "#F5C710"
# [8] "gray62"
pal_matrix <- matrix(seq_along(pal), nr=1)
image(pal_matrix, col = pal, axes = FALSE)
# 8 rows, 1 column, but no labeling
# Starting from bottom, left.

par()$usr  # change with the data dim
text(0, (par()$usr[4]-par()$usr[3])/8*c(0:7), 
     labels = pal)
</syntaxhighlight>