Закажите категориальные данные в таблице с разбивкой по строкам с помощью ggplot2

У меня есть матрица со следующими элементами:

Я хочу создать многострочный график, подобный этому

Единственная проблема заключается в том, что я бы хотел, чтобы порядок стеков соответствовал этому (ETB, PMA, PER, KON, TRA, DDR, BUM, MAT, HED, EXP) - номера заказов в матрице и у меня также есть некоторые эстетические проблемы. Я искал решение здесь, но ни один из предложений для заказа не работал у меня...: -\

Вот код, который я использовал для рисования моего сюжета:

Ответы

Ответ 1

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

p0 = qplot(factor(kclust), fill = reorder(hhDomMil, order), position = 'fill', 
       data = df1)

Вот элементы этого кода, которые заботятся о ваших вопросах.

Как мне построить такой упорядоченный сюжет? reorder
Как настроить x, чтобы каждая строка была "on" одним номером? factor(kclust)
Как разделять панели?
Как распечатать все числа kclust в x? factor(kclust)

Я помню из предыдущего вашего вопроса, что hhDomMil соответствует различным группам, и я подозреваю, что ваш заказ следует за группировкой. В этом случае вы можете использовать эту информацию для выбора цветовой палитры, которая упрощает отслеживание графика. Вот один из способов сделать это.

mycols = c(brewer.pal(3, 'Oranges'), brewer.pal(3, 'Greens'), 
           brewer.pal(2, 'Blues'), brewer.pal(2, 'PuRd'))

p0 + scale_fill_manual(values = mycols)

Ответ 2

Ответ на этот вопрос легко решить, предварительно отформатировав ваши данные, прежде чем передавать его на ggplot(). Ключ состоит в том, чтобы явно установить уровни фактора hhDomMil. Предполагая, что ваши данные находятся в dat:

dat <- transform(dat, hhDomMil = factor(hhDomMil,
                                        levels = c("ETB", "PMA", "PER", "KON",
                                                   "TRA", "DDR", "BUM", "MAT",
                                                   "HED", "EXP")))

Это фиксирует hhDomMil как фактор, расположенный внутри dat, и устанавливает уровни в том порядке, в котором вы хотели:

> head(dat$hhDomMil)
[1] HED ETB HED ETB PER BUM
Levels: ETB PMA PER KON TRA DDR BUM MAT HED EXP

Обратите внимание на то, что происходит, когда R коэрцирует hhDomMil в коэффициент:

> head(factor(as.character(dat$hhDomMil)))
[1] HED ETB HED ETB PER BUM
Levels: BUM DDR ETB EXP HED KON MAT PER PMA TRA

Значение по умолчанию - сортировка уровней по алфавиту, поэтому график выводится, когда вы показываете.

Лучший совет, который я могу дать, состоит в том, чтобы сначала правильно отформатировать ваши данные и только затем попытаться построить его - не полагайтесь на автоматическое или "на лету" конвертирование, чтобы получить это право для вас; неизбежно это будет не то, что вы хотите.

Ответ 3

Если вы создадите свой hhDomMil в качестве такого фактора:

o<-c("ETB" "PMA" "PER" "KON" "TRA" "DDR" "BUM" "MAT" "HED" "EXP")
d$hh<-factor(d$hhDomMil,levels=o)

тогда ваш сюжет будет в том порядке, который вам нравится:

ggplot(d,(aes(x=kclust, fill=hh))) +geom_bar(position="fill")