palette_subsample {lterpalettefinder}

Randomly Subsample HEX Codes

Description

Randomly subsample the HEX codes returned by 'palette_extract()' or 'palette_sort()' to desired length. Can also set random seed for reproducibility.

Usage

palette_subsample(palette, wanted = 5, random_seed = 36)

Arguments

palette

(character) Vector of hexadecimal codes like those returned by 'palette_extract()' or 'palette_sort()'

wanted

(numeric) Integer for how many colors should be returned

random_seed

(numeric) Integer for 'base::set.seed()'

Value

(character) Vector of hexadecimal codes of user-specified length

Examples

# Extract colors from a supplied image
my_colors <- palette_extract(image = system.file("extdata", "lyon-fire.png",
package = "lterpalettefinder"))
       
# Plot that result
palette_ggdemo(palette = my_colors)

# Now randomly subsample
random_colors <- palette_subsample(palette = my_colors, wanted = 5)

# And plot again to show change
palette_ggdemo(palette = random_colors)