From 14f4c91d7c59536c94b01824c0fdcb476babc470 Mon Sep 17 00:00:00 2001 From: Sajjad Ghaffarinasabsharabiani <ghaffas@hhu.de> Date: Mon, 6 Mar 2023 11:54:20 +0000 Subject: [PATCH] Upload New File --- CCB_theme.R | 27 +++++++++++++++++++++++++++ 1 file changed, 27 insertions(+) create mode 100644 CCB_theme.R diff --git a/CCB_theme.R b/CCB_theme.R new file mode 100644 index 0000000..9a03f0e --- /dev/null +++ b/CCB_theme.R @@ -0,0 +1,27 @@ + +mycolor <- c("#4477AA", "#EE6677", "#228833", "#CCBB44", "#66CCEE", "#AA3377", "#BBBBBB") +CCB_plot_style <- function(...) +{ + + theme_bw()+ + + + theme( + text = element_text(size=16,face="bold",color="black",family="sans"), + axis.title.x = element_text(color = "black", size = 20, face = "bold",margin = margin(t = 5, r = 0, b = 0, l = 0)), + axis.title.y.left = element_text(color = "black", size = 20, face = "bold",margin = margin(t = 0, r = 5, b = 0, l = 0)), + axis.text.x=element_text(size=18,family="sans",face="bold",colour="#666666"), + axis.text.y=element_text(size=18,family="sans",face="bold",colour="#666666"), + plot.margin = margin(10, 10, 10, 10), + axis.title.y = element_text(color = "black", size = 16, face = "bold", margin = margin(t = 0, r = 10, b = 0, l = 0)), + legend.box.background = element_rect(colour = "black",linewidth = 1), + panel.grid.major = element_blank(), + panel.grid.minor = element_blank(), + panel.border = element_blank() , + panel.background = element_blank(), + axis.line = element_line(color = '#666666',linewidth = 0.8), + axis.ticks =element_line(color="#666666",linewidth =1), + axis.ticks.length=unit(c(-0.3,0.3), "cm")) + + +} \ No newline at end of file -- GitLab