pirateplot()

The pirateplot() function creates a pirateplot

pirateplot(formula = weight ~ Time,
           data = ChickWeight,
           main = "Chicken weights by Time (week)")

piratepal()

The piratepal() function returns different color palettes either created by graphic designers, or inspired by random things I have found around my office piratepal("espresso"), or horror movies piratepal("evildead)". Here are all of the palettes:

piratepal("all")

You can then use specific palettes in your plots by specifying the named palette. I’ll create a scatterplot using the google palette with piratepal('google', trans = .5):

my.cols <- piratepal(palette = "google",  
                     trans = .5)

set.seed(100) # For reproducibility
x <- rnorm(100)
y <- x + rnorm(100)

plot(x = x, y = y, col =  my.cols,
     pch = 16,
     cex = runif(100, min = 0, max = 2),
     main = "piratepal('google', trans = .5)")

References