########## make a large screen for a lot of colors
### dev.new(width=12, height=12)
SHOWPAL(colors(), ncol=15, NAME=FALSE)
gcol = setXMCOL()
SHOWPAL(gcol, ncol=10, NAME=TRUE)
#### show index:
SHOWPAL(gcol, ncol=10, NAME=TRUE, NUM=TRUE)
pl = c("grey", "lightblue1", "pink", "darkseagreen2", "gold1",
"chartreuse1", "aquamarine", "plum1", "goldenrod", "maroon1",
"deepskyblue", "palegreen2", "salmon")
SHOWPAL(pl, NAME=TRUE, NUM=TRUE)
SYSCOL = pastel.colors(100)
SHOWPAL(SYSCOL, ncol=10)
SYSCOL = sepia.colors(100)
SHOWPAL(SYSCOL, ncol=10)
SYSCOL = hcl(h=seq(from=0, to=260, length=100) )
SHOWPAL(SYSCOL, ncol=10)
Run the code above in your browser using DataLab