tests/testthat/test-PaletteColors.R

# library(dplyr)
# library(ggplot2)
# library(purrr)
# library(grDevices)
#
# plotOne <- ggplot(starwars, aes(x = mass, y = height)) +
#   geom_point() +
#   scale_x_continuous()
#
# test_that("gogh_interpolate works", {
#  # x <- gogh_interpolate(gogh_palettes_pop$starryNight)
#   x <- gogh_interpolate(gogh_palettes_pop[starryNight])
#   expect_s3_class(x, "character")
# })

Try the ggRtsy package in your browser

Any scripts or data that you put into this service are public.

ggRtsy documentation built on Sept. 16, 2023, 1:08 a.m.