Annotation of researchv10dc/vol2/grap/usapop2.g, revision 1.1.1.1

1.1       root        1: .G1
                      2: label left "Population" "in Millions" left .2
                      3: label right "$x$ re-expressed as" "" \
                      4:        "$space 0 left ( {date - 1600} over 100 right ) sup 7$" left 1.2
                      5: define newx { exp(7*(log(($1-1600)/100))) }
                      6: ticks bot out at newx(1800) "1800", newx(1850) "1850",\
                      7:                 newx(1900) "1900"
                      8: copy "usapop.d" thru {
                      9:   if $1 <= 1900 then { bullet at newx($1),$2 }
                     10: }
                     11: .G2

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.