Reorder the x axes in a bar plot
vec1 <- c("Goalkeeper", "Defense", "Striker") p <- ggplot(theTable, aes(x = x1)) + scale_x_discrete(limits = vec1)