Stacked Area Graph in R
I have studied other similar questions on SO, but can't seem to get this working for my data.
I am aiming for this result:

This is my data frame:
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
When I run:
ggplot(tp, aes(x=Room,y=MB)) + geom_area(aes(fill=factor(Direc)))
I get this result:

How can I get this working?