Annotation of doc/demo/selfteaching/plot.problem, revision 1.1
1.1 ! albertel 1: <problem><displaytitle />
! 2: <script type="loncapa/perl"># The script below generates two arrays that hold
! 3: # 20 random numbers between 5 and 25
! 4: for($i=0;$i<20;$i++) {
! 5: $a[$i] = &random(5.0,25.0,1.0);
! 6: $b[$i] = &random(5.0,25.0,1.0);
! 7: }
! 8: # The script below prints the arrays above
! 9: # separated by commas and spaces
! 10: $aString = $a[0];
! 11: $bString = $a[0];
! 12: for($i=1;$i<20;$i++) {
! 13: $aString = $aString.", ".$a[$i];
! 14: $bString = $bString.", ".$b[$i];
! 15: }</script><gnuplot font="large" width="300" grid="off" height="300" border="on" fgcolor="x000000" align="left" bgcolor="xffffff" transparent="off">
! 16: <axis ymax="30" xmin="0" ymin="0" xmax="30" color="x000000" />
! 17:
! 18: <xlabel>First list</xlabel>
! 19:
! 20: <ylabel>Second list</ylabel>
! 21:
! 22:
! 23:
! 24:
! 25: <curve name="Scatter Plot" linestyle="points" pointtype="0" color="x000000">
! 26: <data>@a</data>
! 27: <data>@b</data>
! 28: </curve>
! 29: </gnuplot>
! 30:
! 31:
! 32: <startouttext />First random list of numbers: <br />$aString <br />
! 33: Second random list of numbers:<br /> $bString <br />
! 34: <br />The answer to this question is "5".<endouttext />
! 35: <numericalresponse id="11" answer="5">
! 36: <responseparam description="Numerical Tolerance" name="tol" type="tolerance" default="5%" />
! 37: <responseparam description="Significant Figures" name="sig" type="int_range,0-16" default="0,15" />
! 38: <textline />
! 39: <hintgroup>
! 40: <startouttext />Enter the hint text here.
! 41: <endouttext />
! 42: </hintgroup>
! 43: </numericalresponse>
! 44: </problem>
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>