From 568bf45cd352dcf51221f0aac47bd63dee278dbc Mon Sep 17 00:00:00 2001 From: Nathan TeBlunthuis Date: Tue, 7 Mar 2023 13:43:37 -0800 Subject: [PATCH] add the variable we are presenting to axis labels. --- resources/functions.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/resources/functions.R b/resources/functions.R index 434d1ca..974797f 100644 --- a/resources/functions.R +++ b/resources/functions.R @@ -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 + 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, top=grid.text("No. classifications",x=0.32,just='right'),