Commit f7b272a7 authored by Holger Brandl's avatar Holger Brandl

use loadpack to load packages

parent 3eb781da
......@@ -163,7 +163,7 @@ plotPDF <- function(fileBaseName, expr, ...){ pdf(paste0(fileBaseName, ".pdf"),
## create a custom color palette for a fixed set of values
## scale_fill_manual(values = create_palette(unique(csWithTopoT1$t1_type)), drop = FALSE)
create_palette <- function(x, pal = 'Set1'){
require_auto(RColorBrewer)
loadpack(RColorBrewer)
ux <- sort(unique(x))
n <-length(ux)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment