Yellowstone sequence: Difference between revisions
Content added Content deleted
SqrtNegInf (talk | contribs) (Added Perl example) |
SqrtNegInf (talk | contribs) m (→{{header|Perl}}: improved handling of image output) |
||
Line 236: | Line 236: | ||
my $gd = $graph->plot(\@data) or die $graph->error; |
my $gd = $graph->plot(\@data) or die $graph->error; |
||
open |
open my $fh, '>', 'yellowstone-sequence.png'; |
||
binmode |
binmode $fh; |
||
print |
print $fh $gd->png(); |
||
close |
close $fh;</lang> |
||
</lang> |
|||
{{out}} |
{{out}} |
||
<pre>The first 30 terms in the Yellowstone sequence: |
<pre>The first 30 terms in the Yellowstone sequence: |