library(tinyplot)
pkgload::load_all("~/Documents/Projects/tinyplot/")
#> ℹ Loading tinyplot
library(palmerpenguins)
tinytheme("clean2", palette.qualitative = c("darkorange", "purple", "cyan4"))
plt(
  bill_depth_mm ~ bill_length_mm | species, penguins,
  pch = "by",
  alpha = 0.8
)

tinytheme("clean2")
plt(
  bill_depth_mm ~ bill_length_mm | species, penguins,
  pch = "by",
  alpha = 0.8,
  palette = c("darkorange", "purple", "cyan4")
)

plt(
  bill_depth_mm ~ bill_length_mm | species, penguins,
  pch = "by",
  alpha = 0.8,
  palette = c("darkorange", "purple")
)
#> Warning in by_col(ngrps = ngrps, col = col, palette = palette, gradient = by_continuous, : 
#> Fewer colours (2) provided than than there are groups (3). Recycling to make up the shortfall.

plt(
  bill_depth_mm ~ bill_length_mm | body_mass_g, penguins,
  pch = "by",
  alpha = 0.8,
  palette = c("darkcyan", "white", "purple")
)