library(ggplot2)
library(jaspGraphs)
setGraphOption("palette", "colorblind")
# use colors directly
colors <- JASPcolors("colorblind")
plot(rnorm(6), col = colors, pch = 16, cex = 2)
colors <- JASPcolors("colorblind")
plot(rnorm(10), col = colors, pch = 16, cex = 2)
# use a function if you want an arbitrary number of colros
colFun <- JASPcolors(palette = "colorblind", asFunction = TRUE)
plot(rnorm(10), col = colFun(10), pch = 16, cex = 2)
# use colorscales in ggplot2
e0 <- 1:10
df <- data.frame(x = e0, y = e0, z = e0, g = factor(e0))
g0 <- ggplot(df, aes(x = x, y = y, color = z, fill = z)) + geom_point(size = 5)
g1 <- ggplot(df, aes(x = x, y = y, color = g, fill = g)) + geom_point(size = 5)
g0
g1 + scale_JASPcolor_discrete() + scale_JASPfill_discrete()
# colorblind is not really suited for a continuous color scale
g0 + scale_JASPcolor_continuous() + scale_JASPfill_continuous()
# viridis already looks a lot better!
setGraphOption("palette", "viridis")
g0 + scale_JASPcolor_continuous() + scale_JASPfill_continuous()
# reset the palette to it's default if you changed it globally!
setGraphOption("palette", "colorblind")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.