getColours: Get some nice colours

In FredHasselman/casnet: A Toolbox for Studying Complex Adaptive Systems and Networks

Get some nice colours

Description

Get some nice colours

Usage

getColours(Ncols, continuous = FALSE, Dcols = c(0, 1))

Arguments

Ncols	Either an integer representing the number of requested colours, or, a numeric vector of integers between 1-58 to select specific colours. Run getColours() without arguments to see a plot of the colours that are available.
continuous	Return a discrete vector of colours, or, a function that represents a gradient between 2 or more colours? If TRUE then argument Ncols must be a numeric vector greater than length 2. NOTE: The input to the gradient function must be (re-)scaled to fall between 0 and 1, e.g. using elascer(). (default = FALSE)
Dcols	If continuous is set to TRUE, this should be a vector of the same length as Ncols representing the relative distances between the colours in the gradient function using values between 0 and 1. (default = c(0,1))

Value

A list of colours

Examples

# This will plot all available colours with their numbers
getColours()

# Get a specific number of colours
getColours(5)

# Get specific colours
getColours(c(4,7,1,40))

# Make a gradient from colour number 4 to 44 via 7
gradFunc <- getColours(Ncols = c(4,7,44), continuous = TRUE, Dcols = c(0,.5,1))

df <- data.frame(x=1:50, y=sort(rnorm(50)))
# Make sure the input is on a scale of 0-1
df$ycol <- elascer(df$y)

library(ggplot2)
ggplot(df, aes(x=x,y=y,colour=ycol)) +
geom_point() +
scale_colour_gradientn("Gradient",colours = gradFunc(df$ycol)) +
theme_bw()

# Make a gradient from colour number 4, to 9, to 7, to 36, to 44
gradFunc <- getColours(Ncols = c(4,9,7,36,44), continuous = TRUE, Dcols = c(0,.33,.5,.66,1))

ggplot(df, aes(x=x,y=y,colour=ycol)) +
geom_point() +
scale_colour_gradientn("Gradient",colours = gradFunc(df$ycol)) +
theme_bw()

FredHasselman/casnet documentation built on Jan. 6, 2025, 3:18 a.m.