Open MrichardsPSRC opened 1 year ago
prison_pop_chart <-interactive_column_chart(t=prison_pop_imprisonment,
x="race-ethnicity", y="estimate",
fill="percent",
pos="dodge", est="percent", moe=NULL,
href=NULL, hrefnm=NULL, hrefcl=NULL,
title="Washington State Population and Prison Percentages by Race/Ethnicity (2019)",
# subtitle=2019,
# source="The Color of Justice: Racial and Equity Disparity in State Prisons (The Sentencing Project), Bureau of Justice Statistics, U.S. Census Bureau",
source=paste0("The Color of Justice: Racial and Equity Disparity in State Prisons (The Sentencing Project)","\n", "Bureau of Justice Statistics","\n", "U.S. Census Bureau"),
dec = 0, color="psrc_dark")
In this chart, I separated the three different sources into different lines and the indentations change, as well as overlapping the legend.
I am generating an interactive bar chart:
And the source information is overlapping the legend information: