georgemsavva, 2 months ago

@lf_araujo maybe make a vector that corresponds to the key, like

key <- c("b1"="mrdoc2_b3_hat", "b3"="mrdoc2_b2_hat")

Then for the red dots set aes(x=key[var]) where var is what you currently have on the x axis.