\Draw \BarClipOn \Define\DrawBar(2){{ \Q=1; \Q/52; \R=1; \R/78; \Scale(\Val\Q,\Val\R) \Scale(#1,#2) \ant }} \BarChart(10 & 50 & 30 & 75) \MoveToLoc(NE)...\MarkLoc(NE) \Axis(SW,NE)(W-3, 0 & 20 & 40 & 60 & 80 ) \Axis(SW,NE)(S-3,&&&&) \EndDraw
[next] [prev] [toc]