A relatively quick plot for this #TidyTuesday. I started by recreating chart 14 in the BEA Working Paper but then I thought to try facet_zoom of {ggforce} instead of a log y axis for the years before 1990.
code on GitHub