Используя scale_x_discrete (limits = ...), чтобы указать порядок баров.
scale_x_discrete (limits = ...)
positions <- c("Goalkeeper", "Defense", "Striker") p <- ggplot(theTable, aes(x = Position)) + scale_x_discrete(limits = positions)