Полосы заказа на гистограмме ggplot2

Я пытаюсь построить гистограмму, на которой самая большая полоса будет ближе всего к оси y, а самая короткая - дальше всего. Это что-то вроде таблицы, которая у меня есть

    Name   Position
1   James  Goalkeeper
2   Frank  Goalkeeper
3   Jean   Defense
4   Steve  Defense
5   John   Defense
6   Tim    Striker

. Я пытаюсь построить гистограмму, которая бы показывала количество игроков в соответствии с положением

p <- ggplot(theTable, aes(x = Position)) + geom_bar(binwidth = 1)

, но на графике сначала отображается полоса вратаря, затем защита и, наконец, нападающий один. Я бы хотел, чтобы график был упорядочен так, чтобы полоса защиты была ближе всего к оси y, вратарская и, наконец, у нападающей. Спасибо