home *** CD-ROM | disk | FTP | other *** search
/ The UNIX CD Bookshelf / OREILLY_TUCB_UNIX_CD.iso / upt / examples / SOURCES / IPL / PART13.Z / PART13
Encoding:
Text File  |  1998-07-24  |  22.9 KB  |  1,542 lines
  1. Subject:  v21i044:  2D graphic system with table beautifier, Part13/14
  2. Newsgroups: comp.sources.unix
  3. Approved: rsalz@uunet.UU.NET
  4. X-Checksum-Snefru: 416baef0 302c9a67 158e5926 a6c204af
  5.  
  6. Submitted-by: Steve Grubb <uunet!lsr-vax!scg>
  7. Posting-number: Volume 21, Issue 44
  8. Archive-name: ipl/part13
  9.  
  10. # ipl part13
  11. #    This is a shell archive.
  12. #    Remove everything above and including the cut line.
  13. #    Then run the rest of the file through sh.
  14. #---------------------- cut here -----------------------------
  15. #!/bin/sh
  16. # shar:    Shell Archiver
  17. #    Run the following text with /bin/sh to create:
  18. #        examples/errorbar1.g
  19. #        examples/examp1.g
  20. #        examples/examp10.g
  21. #        examples/examp12.g
  22. #        examples/examp13.g
  23. #        examples/examp14.g
  24. #        examples/examp16.g
  25. #        examples/examp2.g
  26. #        examples/examp3.g
  27. #        examples/examp4.g
  28. #        examples/examp5.sipl
  29. #        examples/examp6.g
  30. #        examples/examp7.g
  31. #        examples/gdtest.g
  32. #        examples/legend1.g
  33. #        examples/lineplot1.g
  34. #        examples/map1.g
  35. #        examples/nicetab1.g
  36. cat << \SHAR_EOF > examples/errorbar1.g
  37. Proc Page:
  38. Title:    Error bar example
  39.  
  40. Proc Areadef:
  41. Area.rectangle:    2 5 6 8
  42. Ymax:    0.25
  43. Yinc:    0.05
  44. Ymin:  -0.10
  45. Xmax:    0.20
  46. Xmin:    -0.05
  47. Xinc:    0.05
  48. Xticfmt: %4.2f
  49. Yticfmt: %4.2f
  50. Ylabel:    95% CI on p1 - p2
  51. Xlabel:    Observed Difference in Mortality ( p1 - p2 )
  52.  
  53. Proc Getdata:
  54. Data:    0    .080 .057 .046 .040 .037
  55.     0.05    .078 .055 .045 .039 .036
  56.     0.1     .075 .053 .043 .038 .034
  57.     0.15    .072 .051 .041 .036 .033
  58.  
  59. Proc Lineplot:
  60. Xfield:    1
  61. Yfield:    1
  62.     
  63. Proc Errorbars:
  64. Xfield: 1
  65. Yfield:    1
  66. Errfield: 2
  67. Taillen: 0.1
  68. Double:    n
  69. Saveas:    A
  70.  
  71. Proc Errorbars:
  72. Clone:    A
  73. Errfield: 3
  74.  
  75. Proc Errorbars:
  76. Clone:    A
  77. Errfield: 4
  78.  
  79. Proc Errorbars:
  80. Clone:    A
  81. Errfield:  5
  82.  
  83. Proc Errorbars:
  84. Clone: A
  85. Errfield:  6
  86.  
  87. Proc Text:
  88. System:    absolute
  89. Position:  5.5 8
  90. Text:    N = 500
  91.     N = 1000
  92.     N = 1500
  93.     N = 2000
  94.     N = 2400
  95. SHAR_EOF
  96. ############################
  97.  
  98. cat << \SHAR_EOF > examples/examp1.g
  99. Proc Page:
  100. Title:        Number of Records Logged/Entered at Center per Month
  101.         February 28, 1989
  102.  
  103. Proc Areadef:
  104. Xmin:    0
  105. Xmax:    30
  106. Xinc:    1
  107. Xstub:    month
  108. Xstart.0or1:        1
  109. Xstub.startmonth:    1
  110. Xstub.startyear:    87    
  111. Xstub.grid:        line    
  112. Ystub.grid:    line    
  113. Ymin:    0
  114. Ymax:    2000
  115. Yinc:        200
  116. Ystub: num
  117. Xlabel:        Month and year
  118. Ylabel:        Number of records, Accum. =  27,305
  119.  
  120. Proc Getdata:
  121. Datafile:    data0
  122.  
  123. Proc Lineplot:
  124. Yfield:        2
  125. Linethick:    2
  126. Stairstep:    y
  127. Numbers:    y
  128. Label.size:    6
  129. Xstart.0or1:    1
  130. SHAR_EOF
  131. ############################
  132.  
  133. cat << \SHAR_EOF > examples/examp10.g
  134. Proc Page:
  135. Title: Schedule Chart Example
  136. Paperway: landscape
  137.  
  138. Proc Areadef:
  139. Area: standard
  140. Xmin: 9
  141. Xmax: 18
  142. Xstub:    9AM
  143.     10
  144.     11
  145.     12~NOON
  146.     1PM
  147.     2
  148.     3
  149.     4
  150.     5
  151.     6PM
  152.     7
  153.     8
  154.     9
  155. Xstub.grid: line
  156. Xstub.stubs: both
  157. Xlabel: Monday, January 22, 1990
  158. Ymax: 5
  159. Ystart.0or1: 1
  160. # These are specified from bottom up..
  161. Ystub:  Room 1020
  162.     Room 1044
  163.     Room 1052
  164.     Auditorium
  165.  
  166. Proc Getdata:
  167. # Hours expressed in 24-hour notation, minutes in decimal
  168. # fractions.  For example 12.5 = 12:30 pm.
  169. Data:    1 9 11 11 12.5 12.5 15 
  170.     2 9 10 10 12   14   17 
  171.     3 10 14 15 18
  172.     4 9 17
  173.       
  174. Proc Vrangebar:
  175. Nval: 2
  176. Width: .8
  177. Field: 2 3
  178. Yfield: 1
  179. Shade: 0.95
  180.  
  181. Proc Vrangebar:
  182. Nval: 2
  183. Width: .8
  184. Field: 4 5
  185. Yfield: 1
  186. Shade: 1.0
  187.  
  188. Proc Vrangebar:
  189. Nval: 2
  190. Width: .8
  191. Field: 6 7
  192. Yfield: 1
  193. Shade: 0.9 
  194.  
  195.  
  196. Proc Text:
  197. Position:   2.15   5.20
  198. Text: Vendor exhibits and product demonstrations                                     
  199.  
  200. Proc Text:
  201. Position:   2.55   4.25
  202. Text: Session 1, Intro to MIDI                                                       
  203.  
  204. Proc Text:
  205. Position:   6.64   4.26
  206. Text: Session 2, Intro to MIDI                                                       
  207.  
  208. Proc Text:
  209. Position:   1.54   3.46
  210. Text: Keynote                                                                        
  211. Address                                                                        
  212.  
  213. Proc Text:
  214. Position:   2.68   3.42
  215. Text: Plenary                                                                        
  216. Session 1                                                                      
  217.  
  218. Proc Text:
  219. Position:   6.25   3.45
  220. Text: Panel Discussion                                                               
  221. System Excusive Codes                                                          
  222.  
  223. Proc Text:
  224. Position:   1.60   2.51
  225. Text: Current issues                                                                 
  226. in sampling devices                                                            
  227.  
  228. Proc Text:
  229. Position:   3.45   2.51
  230. Text: SIG                                                                            
  231. Luncheons                                                                      
  232.  
  233. Proc Text:
  234. Position:   4.61   2.53
  235. Text: Future directions                                                              
  236. in SMTPE interfaces                                                            
  237. SHAR_EOF
  238. ############################
  239.  
  240. cat << \SHAR_EOF > examples/examp12.g
  241. # 
  242. #
  243. Proc Page:
  244.   Paperway:    landscape
  245.   Title:    CHANGE IN RESPONSE LEVEL OVER TIME
  246.         Paradigm 17
  247.         August 1, 1989
  248.   Title.size:    11
  249.   Title.belowtop:    0.7
  250.   Standard.linethick: 0.4
  251.  
  252. # DISTRIBUTIONS
  253. # get distribution data
  254. Proc Getdata:
  255.   Datafile:    data12a
  256.  
  257. # do axes (only) for distributions
  258. # vertical is offset slightly for exact accuracy, e.g.
  259. # so that the zero line goes down the middle
  260. Proc Areadef:
  261.   Saveas:    B
  262.   Area.left:    1.0
  263.   Area.right:    10.0
  264.   Area.bottom:    3.48
  265.   Area.top:    5.98
  266.   Ylabel:    Change in Response Level
  267.   Ylabel.size:    9
  268.   Ymin:        -18
  269.   Ymax:        14
  270.   Yinc:        2
  271.   Xmax:        13
  272.   Xaxis:        none
  273.   Yaxis:        both
  274.   Ystub.tics:    both
  275.   Ystub.stubs:    both
  276.   
  277. Proc Draw:
  278.   System:        data
  279.   Points:        0 0 13 0
  280.   Linethick:        0.4
  281.  
  282. # set up some areas for printing headings (only)
  283. # (so that the visit and time annotations span two graphs)
  284. Proc Areadef:
  285.   Saveas:    D
  286.   Area.left:    1.6
  287.   Area.right:    2.8
  288.   Area.bottom:     3.5
  289.   Area.top:    6.0
  290.   Xmax:        1
  291.   Ymax:     1
  292.   Xaxis:    none
  293.   Yaxis:    none
  294.   Subtitle:    6 months
  295.   Subtitle.justify: center
  296.   Subtitle.size: 8
  297.   Subtitle.above: 0.2
  298.   
  299. Proc Areadef:
  300.   Clone:    D
  301.   Area.left:    3.0
  302.   Area.right:    4.2
  303.   Subtitle:    12 months
  304.  
  305. Proc Areadef:
  306.   Clone:    D
  307.   Area.left:    4.4
  308.   Area.right:    5.6
  309.   Subtitle:    18 months
  310.  
  311. Proc Areadef:
  312.   Clone:    D
  313.   Area.left:    5.8
  314.   Area.right:    7.0
  315.   Subtitle:    24 months
  316.  
  317. Proc Areadef:
  318.   Clone:    D
  319.   Area.left:    7.2
  320.   Area.right:    8.4
  321.   Subtitle:    30 months
  322.  
  323. Proc Areadef:
  324.   Clone:    D
  325.   Area.left:    8.6
  326.   Area.right:    9.8
  327.   Subtitle:    36 months
  328.  
  329. # area for 1st distribution
  330. Proc Areadef:
  331.   Saveas:    Z
  332.   Subtitle:    Test
  333.   Subtitle.size: 8
  334.   Area.left:    1.8
  335.   Area.right:    2.4
  336.   Area.bottom:    3.5
  337.   Area.top:    6.0
  338.   Ymin:        -18
  339.   Ymax:        14
  340.   Xmax:        20
  341.   Xaxis:    none
  342.   Yaxis:    none
  343. Proc Vbargraph:
  344.   Field:    2
  345.   Killwild:    20
  346.   
  347. # area for 2nd distribution
  348. Proc Areadef:
  349.   Clone:    Z
  350.   Subtitle:    Control
  351.   Area.left:    2.4
  352.   Area.right:    3.0
  353. Proc Vbargraph:
  354.   Field:    3
  355.   Killwild:    20
  356.  
  357. # area for 3rd distribution
  358. Proc Areadef:
  359.   Clone:    Z
  360.   Subtitle:    Test
  361.   Area.left:    3.2
  362.   Area.right:    3.8
  363. Proc Vbargraph:
  364.   Field:    4
  365.   Killwild:    20
  366.  
  367. # area for 4th distribution
  368. Proc Areadef:
  369.   Clone:    Z
  370.   Subtitle:    Control
  371.   Area.left:    3.8
  372.   Area.right:    4.4
  373. Proc Vbargraph:
  374.   Field:    5
  375.   Killwild:    20
  376.  
  377. # area for 5th distribution
  378. Proc Areadef:
  379.   Clone:    Z
  380.   Subtitle:    Test
  381.   Area.left:    4.6
  382.   Area.right:    5.2
  383. Proc Vbargraph:
  384.   Field:    6
  385.   Killwild:    20
  386.  
  387. # area for 6th distribution
  388. Proc Areadef:
  389.   Clone:    Z
  390.   Subtitle:    Control
  391.   Area.left:    5.2
  392.   Area.right:    5.8
  393. Proc Vbargraph:
  394.   Field:    7
  395.   Killwild:    20
  396.  
  397. # area for 7th distribution
  398. Proc Areadef:
  399.   Clone:    Z
  400.   Subtitle:    Test
  401.   Area.left:    6.0
  402.   Area.right:    6.6
  403. Proc Vbargraph:
  404.   Field:    8
  405.   Killwild:    20
  406.  
  407. # area for 8th distribution
  408. Proc Areadef:
  409.   Clone:    Z
  410.   Subtitle:    Control
  411.   Area.left:    6.6
  412.   Area.right:    7.2
  413. Proc Vbargraph:
  414.   Field:    9
  415.   Killwild:    20
  416.  
  417. # area for 9th distribution
  418. Proc Areadef:
  419.   Clone: Z
  420.   Subtitle:    Test
  421.   Area.left:    7.4
  422.   Area.right:    8.0
  423. Proc Vbargraph:
  424.   Field:    10
  425.   Killwild:    20
  426.  
  427. # area for 10th distribution
  428. Proc Areadef:
  429.   Clone:    Z
  430.   Subtitle:    Control
  431.   Area.left:    8.0
  432.   Area.right:    8.6
  433. Proc Vbargraph:
  434.   Field:    11
  435.   Killwild:    20
  436.  
  437. # area for 11th distribution
  438. Proc Areadef:
  439.   Clone:    Z
  440.   Subtitle:    Test
  441.   Area.left:    8.8
  442.   Area.right:    9.4
  443. Proc Vbargraph:
  444.   Field:    12
  445.   Killwild:    20
  446.  
  447. # area for 12th distribution
  448. Proc Areadef:
  449.   Clone:    Z
  450.   Subtitle:    Control
  451.   Area.left:    9.4
  452.   Area.right:    10.0
  453. Proc Vbargraph:
  454.   Field:    13
  455.   Killwild:    20
  456.  
  457. # BOX PLOTS
  458. # get data for box plots
  459. Proc Getdata:
  460.   Datafile:    data12b
  461.  
  462. # setup one area for all box plots
  463. Proc Areadef:
  464.   Clone:    B
  465.   Area.top:    3.0
  466.   Area.bottom:    0.5
  467.  
  468. # do the box plots
  469. Proc Boxplot:
  470.   Fields:    1 2 3 4 5 6
  471.   Xloc:        1.2
  472.   Width:    0.15
  473.   Datarow:    1
  474.   Saveas:    C
  475.  
  476. Proc Boxplot:
  477. Clone:        C
  478. Xloc:        2
  479. Datarow:    2
  480.  
  481. Proc Boxplot:
  482. Clone:         C
  483. Xloc:        3.2
  484. Datarow:    3
  485.  
  486. Proc Boxplot:
  487. Clone:        C
  488. Xloc:        4
  489. Datarow:    4
  490.  
  491. Proc Boxplot:
  492. Clone:        C
  493. Xloc:        5.2
  494. Datarow:    5
  495.  
  496. Proc Boxplot:
  497. Clone:        C
  498. Xloc:        6
  499. Datarow:    6
  500.  
  501. Proc Boxplot:
  502. Clone:        C
  503. Xloc:        7.2
  504. Datarow:    7
  505.  
  506. Proc Boxplot:
  507. Clone:        C
  508. Xloc:        8
  509. Datarow:    8
  510.  
  511. Proc Boxplot:
  512. Clone:        C
  513. Xloc:        9.2
  514. Datarow:    9
  515.  
  516. Proc Boxplot:
  517. Clone:        C
  518. Xloc:        10
  519. Datarow:    10
  520.  
  521. Proc Boxplot:
  522. Clone:        C
  523. Xloc:        11.2
  524. Datarow:    11
  525.  
  526. Proc Boxplot:
  527. Clone:        C
  528. Xloc:        12
  529. Datarow:    12
  530.  
  531. SHAR_EOF
  532. ############################
  533.  
  534. cat << \SHAR_EOF > examples/examp13.g
  535. Proc Page:
  536. Paperway:    landscape
  537. Title:    Clinical Trial Enrollment
  538.     == Goals and Progress ==
  539. Standard.linethick:    0.3
  540.  
  541. Proc Getdata:
  542. # data entered by hand from checking each monthly recruitment report
  543. # since the beginning of the study.  Subsequent runs can just append recent
  544. # data.
  545. Data:    0
  546. 5
  547. 2
  548. 4
  549. 11
  550. 6
  551. 5
  552. 8
  553. 9
  554. 10
  555. 9
  556. 10
  557. 11
  558. 5
  559. 8
  560. 13
  561. 11
  562. 12
  563. 6
  564. 12
  565. 14
  566. 5
  567. 7
  568. 5
  569. 12
  570. 7
  571. 11
  572. 9
  573. 3
  574. 14
  575. 7
  576. 7
  577.  
  578. Proc Areadef:
  579. Xmax:    96
  580. Ymax:    2500
  581. Yinc:    500
  582. Ylabel: Cumulative Enrollment
  583. Xlabel:    Calendar Year, By Quarter
  584. Xstub.tics: none
  585. Xstub.stubs: none
  586.  
  587. Proc Lineplot:
  588. Yfield:  1
  589. Accum:    y
  590. Label: Actual Enrollment
  591.  
  592. Proc Draw:
  593. Linethick:    0.4
  594. Linetype.magnify:  6
  595. System: data
  596. Saveas: A
  597. Points:    0 0 96 2208
  598.  
  599. Proc Draw:
  600. Clone:    A
  601. Linetype:    3
  602. Points: 0 0 96 1536
  603.  
  604. Proc Draw:
  605. Clone:    A
  606. Linetype:    8
  607. Points:    0 0 96 1152
  608.  
  609. # do another overlaying areadef since we're plotting by months
  610. # but stubs are one per 3-month interval
  611. Proc Areadef:
  612. Saveas:    B
  613. Xmax:    8
  614. Ymax:    2500
  615. Yinc:    500
  616. Xstub.minor: 4
  617. Xstub: 1987
  618.     1988
  619.     1989
  620.     1990
  621.     1991
  622.     1992
  623.     1993
  624.     1994.
  625.  
  626. # do another overlaying areadef for the number of clinics annotation
  627. Proc Areadef:
  628. Xmax:    32
  629. Ymax:    2500
  630. Yinc:    500
  631. Xstub.yofs: .4
  632. Xstub.tics: none
  633. Xstub:    .
  634.     15
  635.     22
  636.     27
  637.     29
  638.     31
  639.     31
  640.     32
  641.     32
  642.     32
  643.     36
  644.     39.
  645.  
  646. Proc Text:
  647. Position: 0.65 1.1 
  648. Size: 8
  649. Text: Number of Clinics--
  650.  
  651.  
  652. Proc Legend:
  653. Linetype: 0 3 8 0
  654. Linetype.magnify: 6 6 6 6
  655. Linethick: 0.4 0.4 0.4 1
  656. Entry:    No. required;  Type I  = 0.01,  Type II = 0.10
  657.     No. required;  Type I  = 0.05,  Type II = 0.10
  658.     No. required;  Type I  = 0.05,  Type II = 0.20
  659.     No. randomized
  660. SHAR_EOF
  661. ############################
  662.  
  663. cat << \SHAR_EOF > examples/examp14.g
  664.  
  665. Proc Page:
  666. Paperway:    landscape
  667. Title:        Comparison of Monthly Enrollment with Goals
  668.         Compatible with Several Sample Size Estimates
  669.         == Hypertension Trial ==
  670.  
  671. Proc Getdata:
  672. # data entered by hand from checking each monthly recruitment report
  673. # since the beginning of the study.  Subsequent runs can just append recent
  674. # data.
  675. Data:    
  676. 5
  677. 2
  678. 4
  679. 11
  680. 6
  681. 5
  682. 8
  683. 9
  684. 10
  685. 9
  686. 10
  687. 11
  688. 5
  689. 8
  690. 13
  691. 11
  692. 12
  693. 6
  694. 12
  695. 14
  696. 5
  697. 7
  698. 5
  699. 12
  700. 7
  701. 11
  702. 9
  703. 3
  704. 14
  705. 7
  706. 7
  707.  
  708. Proc Areadef:
  709. Xmax:    96
  710. Ymax:    50
  711. Yinc:    10
  712. Ylabel: Number of Patients Randomized
  713. Xlabel:    Calendar Year and Month
  714. Xstub.stubs: none
  715. Xstub.tics:    none
  716. Ystub.minor: 2
  717.  
  718.  
  719. Proc Lineplot:
  720. Yfield:  1
  721. Xstart.0or1: 1
  722.  
  723. Proc Draw:
  724. Linethick:    0.4
  725. Linetype:    8
  726. Linetype.magnify:  6
  727. System: data
  728. Saveas: A
  729. Points:    0 12 96 12
  730.  
  731. Proc Draw:
  732. Clone: A
  733. Points: 0 16 96 16
  734. Linetype: 3
  735.  
  736. Proc Draw:
  737. Clone:    A
  738. Points: 0 23 96 23
  739. Linetype: 0
  740.  
  741. Proc Legend:
  742. Linetype: 0 3 8 0
  743. Linetype.magnify: 6 6 6 6
  744. Linethick: 0.4 0.4 0.4 1
  745. Entry:    No. required / month;  Type I  = 0.01,  Type II = 0.10
  746.     No. required / month;  Type I  = 0.05,  Type II = 0.10
  747.     No. required / month;  Type I  = 0.05,  Type II = 0.20
  748.     No. randomized, by month
  749.  
  750. Proc Text:
  751. Position:    6 6
  752. Text:    P e  =  0.30,  
  753.  
  754.     ( | P r - P e | / P e )  x  100%  =  25%
  755.  
  756.  
  757. Proc Areadef:
  758. Xmax:    8
  759. Ymax:    50
  760. Yinc:    10
  761. Xstub.minor: 12
  762. Xstub:    1987
  763.     1988
  764.     1989
  765.     1990
  766.     1991
  767.     1992
  768.     1993
  769.     1994
  770.     1995
  771.     1996
  772. SHAR_EOF
  773. ############################
  774.  
  775. cat << \SHAR_EOF > examples/examp16.g
  776. Proc Page:
  777. Title:    Time to Death for Study Patients
  778.      06-30-89
  779.  
  780. Proc Getdata:
  781. Datafile: data16
  782.  
  783. Proc Areadef:    
  784. Area:    lifetab
  785. Xmax:    33
  786. Xinc:    3
  787. Xlabel:    Months of Follow-up
  788. Ymax:    1.0
  789. Yinc:    0.2
  790. Yticfmt:    %3.1f
  791. Ylabel:    Proportion of Patients Alive
  792. Frame:    single
  793. Xstub:    mps
  794. Xstub.size:    8
  795. Ystub.size:    8
  796.  
  797.  
  798. Proc Lineplot:
  799. Xfield:    1
  800. Yfield:    2
  801. Linetype:    0
  802. Stairstep:    y
  803.  
  804. Proc Nicetab:
  805. Area.rectangle:    2.0 4.7 6.0 9.4
  806. Body.only:    y
  807. Body.size:    8
  808. File:    table16
  809. SHAR_EOF
  810. ############################
  811.  
  812. cat << \SHAR_EOF > examples/examp2.g
  813. Proc Page:
  814. Title: Logarithmic Axes
  815.  
  816. Proc Areadef:
  817. Area: square
  818. Xmax: 2000
  819. Xinc: 200
  820. Ymax: 2000
  821. Yinc: 200
  822. Ystub: log1
  823. Yscaletype: log
  824. Xstub: log1
  825. Xscaletype: log
  826. Shade: 0.9
  827.  
  828. Xstub.grid: line
  829. Ystub.grid: line
  830. Frame: double
  831.  
  832.  
  833. Proc Getdata:
  834. Data:
  835. 2.448     1.135     
  836. 3.895     3.385     
  837. 6.393     10.094    
  838. 11.876    29.628    
  839. 26.981    64.371    
  840. 55.860    115.649   
  841. 121.148   180.179   
  842. 292.822   232.134   
  843. 826.290   303.843   
  844.  
  845. Proc Lineplot:
  846. Xfield: 1
  847. Yfield: 2
  848. Linethick: 3
  849.  
  850. Proc Distribution:
  851. Xfield: 1
  852. Yfield: 2
  853. Mark: sym6e
  854. Mark.size: 12
  855.  
  856. Proc Getdata:
  857. Data:
  858. 4.478     1.533     
  859. 4.913     4.720     
  860. 5.648     27.373    
  861. 8.318     195.025   
  862. 13.032    1113.206  
  863.  
  864. Proc Lineplot:
  865. Xfield: 1
  866. Yfield: 2
  867. Linethick: 3
  868. Linetype: 1
  869.  
  870. Proc Distribution:
  871. Xfield: 1
  872. Yfield: 2
  873. Mark: sym4e
  874. Mark.size: 12
  875.  
  876. SHAR_EOF
  877. ############################
  878.  
  879. cat << \SHAR_EOF > examples/examp3.g
  880. # line plot
  881. Proc Page:
  882. Title:    Major Contracts Won, by Division
  883.     For 1988 and 1st Quarter 1989
  884.  
  885. Proc Getdata:
  886. Data:    1st~Quarter~1988    27 5 32
  887.     2nd~Quarter~1988    15 14 82
  888.     3rd~Quarter~1988    17 15 43
  889.     4th~Quarter~1988    37 9 31
  890.     1st~Quarter~1989    45 11 32
  891.  
  892. Proc Areadef:
  893. Xmax:    7
  894. Xinc:    1
  895. Xstub:    @1
  896. Xstub.stubs:    both
  897. Xstub.grid:    line
  898. Xstart.0or1: 1
  899. Ymax:    100
  900. Yinc:    10
  901. Ylabel:    Number of Major Contracts
  902. Xlabel: Time Period
  903.  
  904. Proc Lineplot:
  905. Yfield:        2 3 4
  906. Xstart.0or1:    1
  907. Linetype:    0 1 2
  908. Label:        South Bend
  909.         Grand Rapids
  910.         Lockport
  911. Mark:        sym1e sym4e sym6e
  912.  
  913.  
  914.  
  915. Proc Legend:
  916. Location:    5 2
  917. Entry:    South Bend, John Preston
  918.     Grand Rapids, Felix Catt
  919.     Lockport, Ed Parker
  920. Linetype:    0 1 2    
  921. Mark:        sym1e sym4e sym6e
  922. SHAR_EOF
  923. ############################
  924.  
  925. cat << \SHAR_EOF > examples/examp4.g
  926. Proc Page:
  927. Title:        Disposition of Patients Evaluated with Asbestosis
  928.         by Region and Trial Group
  929.         06-30-89
  930.  
  931. Proc Getdata:
  932. Datafile:    data4
  933.  
  934. Proc Areadef:
  935. Subtitle:    
  936. Area:        2hi
  937. Xmax:         37
  938. Ymax:        50
  939. Yinc: 5
  940. Xstart.0or1:    1
  941. Subtitle.above:    0.02
  942. Subtitle.justify:    left
  943. Xlabel:        Region (A = affiliate)
  944. Ylabel:        Number of Patients
  945. Xstub:        data4A
  946.  
  947. Proc Bargraph:
  948. Field:        8 2 5
  949. Shade:        0.4 0.8 1
  950. Format:        stack
  951.  
  952. Proc Legend:
  953. Entry:        Enrolled
  954.         Eligible but Failed to Enroll
  955.         Ineligible
  956. Shade:        0.4 0.8 1
  957.  
  958. Proc Areadef:
  959. Subtitle:    Medium Tumors
  960. Area:        2lo
  961. Xmax:         37
  962. Ymax:        50
  963. Yinc:     5
  964. Xstart.0or1:    1
  965. Subtitle.above:    0.02
  966. Subtitle.justify:    left
  967. Xlabel:        Region (A = affiliate)
  968. Ylabel:        Number of Patients
  969. Xstub:        data4A
  970.  
  971. Proc Bargraph:
  972. Field:        9 3 6
  973. Shade:        0.4 0.8 1
  974. Format:        stack
  975. SHAR_EOF
  976. ############################
  977.  
  978. cat << \SHAR_EOF > examples/examp5.sipl
  979. # This is a copy of the map example expanded to run on the
  980. # entire graphics window.
  981. Proc Page:
  982. Paperway:     screen
  983. Title:        Eligible Patients Evaluated in Study Centers
  984.         by State or Province of Current Residence
  985.         12-31-88
  986.  
  987. Proc Areadef:
  988. Area.rectangle:    0.5 0.5 9.5 9.5
  989. Xmax:    40
  990. Xinc:    .5
  991. Xstub.grid:    line
  992. Xstub.tics:    none
  993. Xstub.stubs:    none
  994. Ystub.grid:    line
  995. Ymax: 40
  996. Yinc:        .5
  997. Ystub.tics:    none
  998. Ystub.stubs:    none
  999. Frame:        double
  1000.  
  1001. Proc Getdata:
  1002. Datafile: data3
  1003.  
  1004. Proc Map:
  1005. Mode:    statedist
  1006. Statefield:    1
  1007. Threshold: 1 5 10 20 30 50 200
  1008. Shade: 1 .98 .85 .7 .55 .40 .25
  1009.  
  1010. Proc Legend:
  1011. Corner:    A
  1012. Shade: 1 .98 .85 .7 .55 .40 .25
  1013. Entry:    none
  1014.     1 - 4
  1015.     5 - 9
  1016.     10 - 19
  1017.     20 - 30
  1018.     30 - 49
  1019.     50 or more
  1020. SHAR_EOF
  1021. ############################
  1022.  
  1023. cat << \SHAR_EOF > examples/examp6.g
  1024. # Uses rcrt file.  The format of this file is:
  1025. # dummy month smalls-enrolled meds-enrolled larges-enrolled med-goal large-goal yymm 
  1026. #   large-FEs med-FEs large-IPs med-IPs
  1027. # First 7 fields come from recruitment report plot.00 file, others gotten from 
  1028. # cross-tabling the inventory.
  1029.  
  1030. Proc Page:
  1031. Title:            Cumulative Patient Enrollment by Month
  1032.             Group A
  1033.             12-31-88
  1034.  
  1035. Proc Getdata:
  1036. Datafile:    data2
  1037.  
  1038. Proc Areadef:
  1039. Area:            whole
  1040. Ylabel:            Cumulative Number of Patients Enrolled
  1041. Xmax:            35
  1042. Xinc:            1
  1043. Ymax:            500
  1044. Yinc:            50
  1045. Xstub:         month
  1046. Xstub.startmonth:        11
  1047. Xstub.startyear:        86
  1048. Xstart.0or1:        1
  1049. Shade: 0.95
  1050. Ystub.grid: wline
  1051.  
  1052. Proc Lineplot:
  1053. Yfield:        6 4 10 12
  1054. Accum:            y
  1055. Linetype:        1 0 4 7 
  1056. Linetype.magnify:        1 3 3 2
  1057. Label:            Goal
  1058.             Enrolled
  1059.             Failure to Enroll
  1060.             Ineligible
  1061. Xstart.0or1:        1
  1062. Linethick: 2.5 2.5 2.5 2.5 
  1063. SHAR_EOF
  1064. ############################
  1065.  
  1066. cat << \SHAR_EOF > examples/examp7.g
  1067. # Uses rcrt file.  The format of this file is:
  1068. # dummy month smalls-enrolled meds-enrolled larges-enrolled med-goal large-goal yymm 
  1069. #   large-FEs med-FEs large-IPs med-IPs
  1070. # First 7 fields come from recruitment report plot.00 file, others gotten from 
  1071. # cross-tabling the inventory.
  1072. Proc Page:
  1073. Title:            Monthly Patient Recruitment by Group
  1074.             12-31-88
  1075.  
  1076. Proc Getdata:
  1077. Datafile:        data2
  1078.  
  1079. Proc Areadef:
  1080. Area:            2hi
  1081. Subtitle:        Group A
  1082. Xstub:             month
  1083. Xstub.startmonth:    11
  1084. Xstub.startyear:    86
  1085. Subtitle.justify:    left
  1086. Subtitle.above:        0.02
  1087. Ymax:            25
  1088. Yinc:            5
  1089. Xmax:            35
  1090. Xstart.0or1:        1
  1091.  
  1092. Proc Bargraph:
  1093. Field:            5
  1094. Shade:            0.8
  1095. Idfield:        5
  1096.  
  1097. Proc Lineplot:
  1098. Yfield:            7
  1099. Linetype:        1
  1100. Linetype.magnify:    1
  1101. Stairstep.bars:        y
  1102. Xstart.0or1:        1
  1103.  
  1104. Proc Legend:
  1105. Entry:            Monthly Goal
  1106. Linetype:        1
  1107. Linetype.magnify:    1
  1108. Corner:            B
  1109.  
  1110. Proc Areadef:
  1111. Area:            2lo
  1112. Subtitle:        Group B
  1113. Xstub:             month
  1114. Xstub.startmonth:    11
  1115. Xstub.startyear:    86
  1116. Subtitle.justify:    left
  1117. Subtitle.above:        0.02
  1118. Ymax:            25
  1119. Yinc:            5
  1120. Xmax:            35
  1121. Xstart.0or1:        1
  1122.  
  1123. Proc Bargraph:
  1124. Field:            4
  1125. Idfield:        4
  1126. Shade:            0.8
  1127.  
  1128. Proc Lineplot:
  1129. Yfield:        6
  1130. Linetype:        1
  1131. Linetype.magnify:    1
  1132. Stairstep.bars:        y
  1133. Xstart.0or1:        1
  1134. SHAR_EOF
  1135. ############################
  1136.  
  1137.  
  1138. cat << \SHAR_EOF > examples/gdtest.g
  1139. Proc Getdata:
  1140. Data: 
  1141. 1 2 3 4 5 
  1142. 1 2 3 4 5 
  1143. 1 2 3 4 5 
  1144. 1 2 3 4 5 
  1145. 1 2 3 4 5 
  1146. Selectfields: 1 3 5
  1147.  
  1148. Proc Getdata:
  1149. Join: y
  1150. Data: 10 11
  1151.     10 11
  1152.     10 11
  1153.     10 11
  1154.     10 11
  1155.  
  1156. Proc Getdata:
  1157. Append: y
  1158. Data: z z z z z
  1159.       z z z z z
  1160.       z z z z z
  1161. SHAR_EOF
  1162. ############################
  1163.  
  1164. cat << \SHAR_EOF > examples/legend1.g
  1165. Proc Page:
  1166. Title: Legend examples
  1167.     illustrating graphics parameters
  1168.  
  1169. Proc Legend:
  1170. Location: 1 9
  1171. Title:  Figure 1
  1172.     Linetype numbers
  1173. Entry:
  1174.     Linetype 0
  1175.     Linetype 1
  1176.     Linetype 2
  1177.     Linetype 3
  1178.     Linetype 4
  1179.     Linetype 5
  1180.     Linetype 6
  1181.     Linetype 7
  1182.     Linetype 8
  1183.     Linetype 9
  1184. Linetype: 0 1 2 3 4 5 6 7 8 9
  1185. Linetype.magnify: 3 3 3 3 3 3 3 3 3 3
  1186. Linethick: 1 1 1 1 1 1 1 1 1 1
  1187.  
  1188. Proc Legend:
  1189. Location: 3.5 9
  1190. Title: Figure 2
  1191.     Pattern magnification
  1192. Entry:
  1193.     1
  1194.     2
  1195.     3
  1196.     4
  1197.     5
  1198. Linetype: 5 5 5 5 5 
  1199. Linetype.magnify: 1 2 3 4 5 
  1200. Linethick: 1 1 1 1 1
  1201.  
  1202.  
  1203. Proc Legend:
  1204. Location: 5.5 9
  1205. Title: Figure 3
  1206.     Line thicknesses    
  1207. Entry:
  1208.     0.3
  1209.     0.5
  1210.     0.75
  1211.     1
  1212.     1.3
  1213.     1.6
  1214.     2
  1215.     2.5
  1216.     3
  1217.     4
  1218. Linetype: 0 0 0 0 0 0 0 0 0 0
  1219. Linetype.magnify: 3 3 3 3 3 3 3 3 3 3
  1220. Linethick: 0.3 0.5 0.75 1 1.3 1.6 2 2.5 3 4
  1221.  
  1222.  
  1223. Proc Legend:
  1224. Location: 1 6.5
  1225. Title: Figure 4
  1226.     Shading values
  1227. Entry:
  1228.     0.0
  1229.     0.2
  1230.     0.4
  1231.     0.5
  1232.     0.6
  1233.     0.7
  1234.     0.8
  1235.     0.9
  1236.     0.95
  1237.     0.98
  1238. Shade: 0.0 0.2 0.4 0.5 0.6 0.7 0.8 0.9 0.95 0.98
  1239. Entry.size: 10
  1240.  
  1241. Proc Legend:
  1242. Location: 2.6 6.5
  1243. Title: Figure 5
  1244.     Fonts
  1245. Entry:  /Helvetica
  1246.     /Helvetica-Bold
  1247.     /Times-Roman
  1248.     /Times-Bold
  1249.     /Courier
  1250.     /Courier-Bold
  1251.     /Symbol
  1252. Mark.font: /Helvetica /Helvetica-Bold /Times-Roman /Times-Bold /Courier /Courier-Bold /Symbol
  1253. Mark: Flag Flag Flag Flag Flag Flag Flag
  1254. Mark.size: 10
  1255. Entry.size: 10
  1256.  
  1257. Proc Legend:
  1258. Location: 5 6.5
  1259. Title: Figure 6a
  1260.     Point sizes
  1261. Entry:  5
  1262.     6
  1263.     7
  1264.     8
  1265.     9
  1266.     10
  1267.     11
  1268.     12
  1269.     14
  1270. Mark:   a a a a a a a a a
  1271. Mark.size: 5 6 7 8 9 10 11 12 14    
  1272. Entry.size: 10
  1273.  
  1274. Proc Legend:
  1275. Location: 6.3 6.5
  1276. Title: Figure 6b
  1277.     Point sizes
  1278. Title: 
  1279. Entry:  5
  1280.     6
  1281.     7
  1282.     8
  1283.     9
  1284.     10
  1285.     11
  1286.     12
  1287.     14
  1288. Mark.size: 5 6 7 8 9 10 11 12 14    
  1289. Mark:  sym6a sym6a sym6a sym6a sym6a sym6a sym6a sym6a sym6a sym6a 
  1290. Entry.size: 10
  1291.  
  1292. Proc Legend:
  1293. Location: 1.5 2.5
  1294. Title: Figure 7
  1295.     Point Symbols 
  1296. Entry:
  1297.     symbol# sym1n
  1298.     symbol# sym2n
  1299.     symbol# sym3n
  1300.     symbol# sym4n
  1301.     symbol# sym5n
  1302.     symbol# sym6n
  1303.     symbol# sym2o
  1304.     symbol# sym4o
  1305.     characters
  1306.     characters
  1307. Mark:    sym1n sym2n sym3n sym4n sym5n sym6n sym2o sym4o X Y
  1308. Mark.size: 8
  1309.  
  1310. Proc Legend:
  1311. Location:  4 2.5
  1312. Title: Figure 8
  1313.        Lines combined
  1314.     with symbols
  1315. Entry:
  1316.     Linetype 1 and sym1e
  1317.     Linetype 2 and sym2e
  1318.     Linetype 3 and sym3e
  1319.     Linetype 4 and sym4e
  1320.     Linetype 5 and sym5e
  1321.     Linetype 6 and sym6e
  1322.     Linetype 6 and no symbol
  1323. Mark: sym1e sym2e sym3e sym4e sym5e sym6e sym00
  1324. Mark.size: 8
  1325. Linetype: 1 2 3 4 5 6 6
  1326.  
  1327. SHAR_EOF
  1328. ############################
  1329.  
  1330. cat << \SHAR_EOF > examples/lineplot1.g
  1331. Proc Page:
  1332. Title:    Lineplot examples
  1333.  
  1334. Proc Getdata:
  1335. Data:    0 0 2 -5
  1336.     3 2 4 -4.3
  1337.     6 3 6 -.8
  1338.     9 3.5 5 2.3
  1339.     12 4 5 3
  1340.     15 4.7 3.8 1.6
  1341.     18 5.4 3 1.4
  1342.     21 6 3 -0.3
  1343.  
  1344. Proc Areadef:
  1345. Area:    4nw
  1346. Subtitle: Fig. 1
  1347.     Basic lines w/labels
  1348. Subtitle.above: 0.3
  1349. Xmax:    27
  1350. Xinc:    3
  1351. Ymax:    10
  1352. Ymin:    -10
  1353. Yinc:    5
  1354. Saveas: A
  1355.  
  1356. Proc Lineplot:
  1357. Xfield: 1
  1358. Yfield: 2 3 4
  1359. Linetype: 0 1 5
  1360. Linethick: 0.5 1 2
  1361. Label:    Case 1
  1362.     Case 2
  1363.     Case 3
  1364. Saveas: B
  1365.  
  1366. Proc Areadef:
  1367. Clone: A
  1368. Area:    4ne
  1369. Subtitle: Fig. 2
  1370.     Stairstep option
  1371.  
  1372. Proc Lineplot:
  1373. Clone: B
  1374. Yfield: 3 4
  1375. Stairstep: y
  1376.  
  1377. Proc Areadef:
  1378. Clone: A
  1379. Area: 4sw
  1380. Subtitle: Fig. 3
  1381.     Marking data points
  1382.  
  1383. Proc Lineplot:
  1384. Clone: B
  1385. Yfield: 3 4
  1386. Mark:  sym1n sym3g sym6e
  1387. Mark.size: 4
  1388.  
  1389. Proc Areadef:
  1390. Clone: A
  1391. Area: 4se
  1392. Subtitle: Fig. 4
  1393.     Values of data points
  1394. Yticfmt: %3.1f
  1395.  
  1396. Proc Lineplot:
  1397. Clone: B
  1398. Stairstep: y
  1399. Yfield: 4
  1400. Numbers: y
  1401. Label: Case 3
  1402.  
  1403. Proc Lineplot:
  1404. Clone: B
  1405. Yfield: 3
  1406. Numbers: y
  1407. Numbers.offset: 0.05
  1408. Label:  Case 2
  1409. Mark: sym6n
  1410. Mark.size: 2
  1411.  
  1412. Proc Pagebreak:
  1413. Proc Page:
  1414. Title: More lineplot examples..
  1415.  
  1416. Proc Areadef:
  1417. Clone: A
  1418. Area: 2hi
  1419. Subtitle: Fig. 5
  1420.     Shading under lines
  1421.  
  1422. Proc Lineplot:
  1423. Clone: B
  1424. Yfield: 2 3 4
  1425. Shade: .98 .9 .8
  1426. Zeroat: -10
  1427.  
  1428. Proc Areadef:
  1429. Clone: A
  1430. Area: 2lo
  1431. Subtitle: Fig. 6
  1432.     Adjustable crossover point
  1433.  
  1434. Proc Getdata:
  1435. Data:
  1436. 0.159     -7.286    
  1437. 1.359     -6.500    
  1438. 2.459     -5.500    
  1439. 4.259     -2.143    
  1440. 5.559     2.714     
  1441. 6.809     6.500     
  1442. 8.409     8.571     
  1443. 10.409    8.714     
  1444. 11.409    6.857     
  1445. 11.609    2.500     
  1446. 12.059    -2.714    
  1447. 12.609    -4.214    
  1448. 13.659    -1.143    
  1449. 13.709    2.714     
  1450. 14.409    5.500     
  1451. 15.059    3.929     
  1452. 15.459    -1.571    
  1453. 15.859    5.643     
  1454. 16.659    -3.643    
  1455. 17.359    7.929     
  1456. 18.259    -5.000    
  1457. 19.509    9.857     
  1458. 20.309    3.214     
  1459. 21.159    11.143    
  1460. 21.959    9.500     
  1461. 22.509    6.143     
  1462. 23.109    2.357     
  1463. 24.409    -1.071    
  1464. 25.809    -2.357    
  1465. 26.759    -2.929    
  1466.  
  1467. Proc Lineplot:
  1468. Clone: B
  1469. Xfield: 1
  1470. Yfield: 2
  1471. Shade: 0.7
  1472. Label: Tuba
  1473. SHAR_EOF
  1474. ############################
  1475.  
  1476. cat << \SHAR_EOF > examples/map1.g
  1477. Proc Page:
  1478. Title:        Map example
  1479.  
  1480. Proc Areadef:
  1481. Area:    map
  1482. Xmin:    0
  1483. Xmax:    40
  1484. Xinc:    .5
  1485. # Xstub.grid:    line
  1486. Xstub.tics:    none
  1487. Xstub.stubs:    none
  1488. # Ystub.grid:    line
  1489. Ymax: 40
  1490. Ymin: 0
  1491. Yinc:        .5
  1492. Ystub.tics:    none
  1493. Ystub.stubs:    none
  1494. Frame:        double
  1495.  
  1496. Proc Getdata:
  1497. Datafile: data3
  1498.  
  1499. Proc Map:
  1500. Mode:    statedist
  1501. Statefield:    1
  1502. Threshold: 1 5 10 20 30 50 200
  1503. Shade: 1 .98 .85 .7 .55 .40 .25
  1504.  
  1505. Proc Legend:
  1506. Corner:    A
  1507. Shade: 1 .98 .85 .7 .55 .40 .25
  1508. Entry:    none
  1509.     1 - 4
  1510.     5 - 9
  1511.     10 - 19
  1512.     20 - 30
  1513.     30 - 49
  1514.     50 or more
  1515.  
  1516. Proc Getdata:
  1517. Datafile: data.cities
  1518.  
  1519. Proc Distribution:
  1520. Xfield: 1
  1521. Yfield: 2
  1522. Mark: sym6e
  1523. Mark.size: 10
  1524.  
  1525. Proc Text:
  1526. Embeddedcoords: y
  1527. File: data.cities
  1528. System: data
  1529. Size: 7
  1530. SHAR_EOF
  1531. ############################
  1532.  
  1533. cat << \SHAR_EOF > examples/nicetab1.g
  1534. Proc Page:
  1535.  
  1536. Proc Nicetab:
  1537. File:    table10
  1538. SHAR_EOF
  1539. ############################
  1540.  
  1541.  
  1542.