Trying to make a waterfall bar chart. I got this far:
yData = {10, 7, 4, 2}
upFromX = Accumulate[yData] - yData
xyDataWithUplift =
Table[{Style[upFromX[[i]], White], yData[[i]]}, {i, 1, Length[yData]}]
BarChart[xyDataWithUplift, ChartLayout -> "Stacked"]
which is getting there but I can't figure out how to make the bottom rectangle's edge blank. Tried EdgeForm[]
and EdgeForm[White]
but no luck.