Commits

Giovanni Marco Dall'Olio committed 1720de3

COLOURS: black outline for violin plots

Comments (0)

Files changed (2)

results/plots/feedback_charts_2013.pdf

Binary file modified.

src/plot_evaluations.R

 
 violin_plot = list (theme_bw(),
 #        geom_violin(aes(x=variable, y=as.numeric(answer), fill=1), fill="#0072B2""#56B4E9"),
-        geom_violin(aes(x=variable, y=as.numeric(answer)), fill="#0072B2"),
+        geom_violin(aes(x=variable, y=as.numeric(answer)), fill="#0072B2", colour="black"),
         opts(legend.position='none'),
 #        facet_wrap(~variable, nrow=3),
         opts(axis.text.x=theme_text(angle=45, hjust=1, vjust=1 )),
 #        geom_violin(aes(x=Timestamp, y=as.numeric(answer)), fill="#018571"),
 #        geom_violin(aes(x=Timestamp, y=as.numeric(answer)), fill="#238B45"),
 #        geom_violin(aes(x=Timestamp, y=as.numeric(answer)), fill="#74C476"),
-        geom_violin(aes(x=Timestamp, y=as.numeric(answer)), fill="#31A354"),
+        geom_violin(aes(x=Timestamp, y=as.numeric(answer)), fill="#31A354", colour="black"),
         opts(legend.position='none'),
         opts(axis.text.x=theme_text(angle=45, hjust=1, vjust=1 )),
         scale_x_discrete("Student (Timestamp of when the feedback form was filled)")