*
* Example 7/4/1 from pp 349-350
*
open data computer.dat
data(format=free,org=columns) 1 100 computer
*
graph(footer="Figure 7-18 Internet Users data")
# computer
@bjident(diffs=1,number=20) computer