1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
input graph defaultfont:="ptmr8r"; warningcheck:=0; beginfig(1) draw begingraph(2.5in,1.75in); gfill "yearw.dat" withcolor red; for y=10,20,30: itick.lft(format("%g",y),y); endfor otick.top("19th century",1850); otick.top("20th century",1950); frame.llft; autogrid(,); endgraph; endfig; end;