PERUanalytics: R Package to ease work with data

Change color from categorical colors to diverging/sequential colors

1 2	draw_scale_manual(method = "", color = categorical_colors, legend_title = "Legend")

`method`	Which method was used to differ variables in a plot? Two possible value: color or fill.
`color`	Which color group we want to implement? Four possible group: categorical colors,diverging_colors, sequential colors or other color vector. Default value: categorical_colors
`legend_title`	Title of legend. Default value: "Legend"

## Not run: 
ggplot(mtcars, aes(factor(cyl), wt))+
     geom_bar(stat = "identity", fill = categorical_colors[1])+
     theme_peru()+
     draw_scale_numeric("y",0,60)

ggplot(diamonds[1:100,], aes(depth, carat, color = factor(cut)))+
     geom_point(size = 7)+
     theme_peru("color")+
     draw_scale_numeric("y",0,1,0.1,labels_percent = T)
     
## End(Not run)