These functions are color palettes used in tracer.
pal1(n)
plot(1:100, cex=8, pch=20, col = pal1(100), main="palette: pal1")