abs.diff.melt <- melt(AbsAll, measure.vars=c(2:7))
colors <- c("red", "blue")

#jitters a little bit to accommodate overlap
abs.diff <- ggplot(abs.diff.melt, aes(variable, value, shape=LangCond)) + 
  geom_point(aes(colour = LangCond),size=2, alpha=.4, position = position_jitter(w = 0.15, h = 0.0)) + scale_color_manual(values=colors) + xlab("Dimension") + 
  ylab("Absolute Difference") + ggtitle("Variability by Absolute Differences") + theme(axis.line = element_line(colour = "black"), panel.grid.minor = element_blank(), panel.border = element_blank(), panel.background = element_blank())+
  theme(legend.title = element_blank()) + theme(plot.title = element_text(hjust = 0.5))
  print(abs.diff)