Как исправить неправильную загрузку изображения объекта

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

ggplot(theTable, aes(x=reorder(Position, -table(Position)[Position]))) + geom_bar()

Он похож на то, что предложил Алекс Браун, но немного короче и работает без определения какой-либо функции.

Обновление

Я думаю, что мое старое решение было хорошим в то время, но в настоящее время я бы предпочел использовать forcats::fct_infreq, который является уровнем коэффициента сортировки по частоте:

require(forcats)

ggplot(theTable, aes(fct_infreq(Position))) + geom_bar()