lucky {cptcity}

Random colour gradient!

Description

Based on "I'm Feeling Lucky" from Google. As this package includes 7140 colour gradients, it might be hard to find the 'right'

Usage

lucky(
  n = 100,
  colorRampPalette = FALSE,
  rev = FALSE,
  message = TRUE,
  nseed,
  frgb = rep(1, 3)
)

Arguments

n

integer; number of colors

colorRampPalette

Logical; to be used in sf and mapview.

rev

Logical; to internally revert order of rgb color vectors.

message

Logical; for printing or not the name of the colour gradient

nseed

integer; for reproducing the same colour gradient. See set.seed

frgb

Numeric; vector of 3 to change internal rgb composition The order is red, green, blue

Details

The cpt-city web archive comes from: http://soliton.vm.bytemark.co.uk/pub/cpt-city/index.html

Value

A RANDOM colour palette function including name of the colour gradient and number.

Examples

{
library(cptcity)
image(matrix(1:100), col = lucky())
image(matrix(1:100), col = lucky())
image(matrix(1:100), col = lucky())
image(matrix(1:100), col = lucky())
image(matrix(1:100), col = lucky())
image(matrix(1:100), col = lucky(rev = TRUE))
image(matrix(1:100), col = lucky(nseed = 1))
}