library(ggplot2)
df = read.table('data/trans_interaction',header = T,sep = '\t')
ggplot(df,aes(x=group,y=trans)) +geom_boxplot(aes(fill = group),width=0.6)+
  scale_fill_manual(values = c("#2BA809", "#F97164"))+theme_bw() +ylim(0,30)+
  theme(axis.line = element_line(size=1, colour = "black"),
        panel.grid.major = element_blank(),
        panel.grid.minor = element_blank(),
        panel.border = element_blank(), panel.background = element_blank(),
        axis.text.x=element_text(colour="black", size = 9),
        axis.text.y=element_text(colour="black", size = 9))+xlab("")+ylab("Trans interaction (%)")