add the variable we are presenting to axis labels.
This commit is contained in:
@@ -12,7 +12,7 @@ plot.simulation <- function(plot.df, iv='x', levels=c("true","naive", "amelia.fu
|
|||||||
|
|
||||||
p <- p + facet_grid(as.formula(paste(facet_lhs,'~',facet_rhs)),as.table=F)
|
p <- p + facet_grid(as.formula(paste(facet_lhs,'~',facet_rhs)),as.table=F)
|
||||||
|
|
||||||
p <- p + scale_x_discrete(labels=label_wrap_gen(14)) + ylab("Estimate") + xlab("Method") + coord_flip()
|
p <- p + scale_x_discrete(labels=label_wrap_gen(14)) + ylab(paste0("Estimate of ", toupper(iv))) + xlab("Method") + coord_flip()
|
||||||
|
|
||||||
p <- arrangeGrob(p,
|
p <- arrangeGrob(p,
|
||||||
top=grid.text("No. classifications",x=0.32,just='right'),
|
top=grid.text("No. classifications",x=0.32,just='right'),
|
||||||
|
|||||||
Reference in New Issue
Block a user