how to draw a percent stacked bar plot from two distinct binary-valued columns in ggplot2?

Question

I have two binary-valued columns in foods dataframe as follows:

foods$veryHealthy:

"False" "False" "True"  "True"  "False" "False" "False" "True"  "False" "False" "True"  "False"

"True"  "False" "False" "True"  "False" "True"  "False" "False" "True"  "False" "False" "False" ...

foods$dairyFree:

"True"  "True"  "True"  "True"  "True"  "True"  "True"  "True"  "False" "True"  "True"  "False"

"True"  "False" "False" "True"  "True"  "True"  "True"  "False" "True"  "False" "True"  "True" ...

I want to get some plot like:

for the x-axis instead of four categories I want to use binary values.

notice how thickness of bars changes based on the number of instances in each class.

I have tried the following code but it did not get me the result:

ggplot(foods, aes(x=veryHealthy, y=dairyFree, fill=dairyFree)) + 
  geom_col(position = "fill")

edit: I have to use ggplot2 and not any built-in or other libararies.

DPH · Answer 1 · 2021-11-27T13:10:38.263

I guess you are looking for the package ggmosaic here you can find the vingette for some examples:

# dummy data
df <- data.frame(veryHealthy = c("False","False","True","True","False","False","False","True","False","False","True","False","True","False","False","True","False","True","False","False","True","False","False","False"),
                 dairyFree = c("True","True","True","True","True","True","True","True","False","True","True","False","True","False","False","True","True","True","True","False","True","False","True","True"))

library(ggplot2)
library(ggmosaic)

# simple implementation with your dummy data
ggplot2::ggplot(data = df) +
    ggmosaic::geom_mosaic(aes(x = product(veryHealthy, dairyFree), fill = veryHealthy ))

EDIT:

maybe this does the work for you (using the same dummy data as before):

plot(table(df))

And here you can find some "manual" aproaches

thanks for answering, but I have to use ggplot2 itself. I'm sorry I did not explicitly emphasize it. — Hamed_Gholami, Nov 27 '21 at 12:44
@Hamed have a look at the altered answer... possibly this does the job the way you need it — DPH, Nov 27 '21 at 12:54

how to draw a percent stacked bar plot from two distinct binary-valued columns in ggplot2?

1 Answers1