График уложенной области в R

Question

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

Я стремлюсь к такому результату:

Это мой кадр данных:

 
    Room Direc MB 
    Alley-10 Rx 1 
    Alley-11 Rx 7 
    Alley-12 Rx 11 
    Alley-10 Tx 23 
    Alley-11 Tx 17 
    Alley-12 Tx 20 

Когда я бегу:

ggplot(tp, aes(x=Room,y=MB)) + geom_area(aes(fill=factor(Direc))) 

Я получаю этот результат:

Как я могу заставить это работать?

Answer 1

Это не сработает, потому что переменная Room рассматривается как фактор и, следовательно, не имеет смысла поддерживать непрерывные линии.

Заговор:

ggplot(tp, aes(x=1:3, y=MB, fill=Direc)) + 
    geom_area() 

дает результат я думаю, что вы ожидали. Затем вы можете добавить:

ggplot(tp, aes(x=1:3, y=MB, fill=Direc)) + 
    geom_area() + 
    scale_x_discrete(labels=tp$Room) 

для исправления этикеток.