home *** CD-ROM | disk | FTP | other *** search
- /* Example05.plot - Test of drawing a histogram */
- /* Modified for RexxPlPlot by Glenn M. Lewis - 9/12/89 */
-
- address 'PlPlot'
- say 'Please be patient...'
-
- /* Fill up data points */
-
- do i=1 to 2049; data.i = sin(0.01*i); end i
-
- 'plstar(1,1);'
- 'plhist(2049,data,-1.1,1.1,44,0);'
- 'pllab("\frValue","\frFrequency","\frPLPLOT Example 5 - Probability function of Oscillator");'
-
- 'plend();'
-
- exit 0
-
-