search

psrc / psrcplot

Package for Creating PSRC consistent data visualizations with R
https://psrc.github.io/psrcplot/
GNU General Public License v3.0
2 stars 0 forks source link

potential issue: legend text cutting off, not wrapping #82

Open MrichardsPSRC opened 1 year ago

MrichardsPSRC commented 1 year ago

own_race_income_chart <- static_bar_chart(t=dt_2021_simprace, x="share", y="income_cat", fill="HRACE", pos="dodge", est="percent",

moe="share_moe",

                                      # href="ref_val", hrefnm="Region",
                                      # hrefcl='#00716c',
                                      title="Regional Homeownership by Income and Race/Ethnicity",
                                      subtitle=NULL,
                                      source=paste("U.S. Census Bureau, American Community Survey (ACS) 2021 1-Year Public Use Microdata Sample (PUMS)"),
                                      alt=NULL,
                                      xlabel=NULL, ylabel=NULL,
                                      dec = 2, color="psrc_light") #+ theme(legend.position = "none") + scale_x_discrete(limits=rev) #alphabetical order

own-race-income-chart-1

This could be because I set the Rmarkdown to include Christy's suggested setting : {r own-race-income-chart, fig.width=10}

When I generate it in Rstudio: image

jensenmj commented 1 year ago

We can wrap the text by specifying the length, c <- c + ggplot2::scale_color_discrete(labels = function(x) stringr::str_wrap(x, width = 15)) The trick here is to know how long and under what circumstances.

Taking a step back, though, I'd suggest more charts without legends at all: axis labels or even annotations within the chart are better for intuitive storytelling with data. If legend entries require wrapping, it busies things and makes quick association with the color harder. Everyone is mentally reducing that 48-character label to something shorter anyway; why not edit it down?