Таблица - создание агрегации итоговых продуктов в итоговой строке

@GavinSimpson: reorder является мощным и эффективным решением для этого:

ggplot(theTable,
       aes(x=reorder(Position,Position,
                     function(x)-length(x)))) +
       geom_bar()