Ggplot not plotting all my data

Here is an example:

library(tidyverse)

data_date <- data.frame(
         iid = c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10),
      gender = c(0, 0, 0, 0, 0, 1, 1, 1, 1, 1),
        date = c(1, 2, 1, 1, 1, 1, 2, 2, 2, 2)
)

data_date %>%
    mutate(date = factor(date, labels = c("sev/wk", "never")),
           gender = factor(gender, labels = c("Female", "Male"))) %>% 
    ggplot(aes(y = date, fill = gender)) +
    geom_bar(color = "white") +
    labs(title = "Dating Frequency",
         x = "Dating Frequency",
         y = "Count",
         fill = "Gender")

Created on 2021-05-14 by the reprex package (v2.0.0)

Note: Next time please provide a proper REPRoducible EXample (reprex) illustrating your issue.