How to combine columns bar chart

I need to draw this chart by using my existed data. This is what my data looks like. This is the error: bug

This is what I tried:

percent_incarcerated <- c(0, 5)
  top_10_black_incarceration_plot <- ggplot(top_10_black_incarceration_states_df)+
  geom_col(aes(x = state, y = percent_incarcerated, fill = c(Black, Total)),
       position = "dodge", stat="identity") + 
  geom_col(position="dodge", stat="identity") 

Can anyone help please? thank you!

from Recent Questions - Stack Overflow https://ift.tt/3qNLxIB
https://ift.tt/eA8V8J