# keep examples from using more than 2 cores
data.table::setDTthreads(Sys.getenv("OMP_THREAD_LIMIT", unset = 2))
# better graphics defaults
op <- par(
mar = c(0, 0, 0, 0),
fg = 'white',
bg = 'black',
xpd = NA
)
# full set of hues, as generated by huePosition(returnHues = TRUE)
huePositionCircle()
# just a few hues
huePositionCircle(hues = c('5R', '5Y', '5G', '5B', '5P'))
# adjust Munsell value and chroma
huePositionCircle(value = 3, chroma = 6)
# reset graphics state
par(op)
Run the code above in your browser using DataLab