Reorder factor levels. For example:
XP_DATA$LANGUAGE = factor(XP_DATA$LANGUAGE, levels=c("Spanish", "Italian", "English"))