Yellowstone sequence: Difference between revisions
Content added Content deleted
Thundergnat (talk | contribs) m (→{{header|Perl 6}}: Slightly less inefficient) |
m (→{{header|zkl}}: update) |
||
| Line 255: | Line 255: | ||
{{trans|Julia}} |
{{trans|Julia}} |
||
This sequence is limited to the max size of a Dictionary, 64k |
This sequence is limited to the max size of a Dictionary, 64k |
||
<lang zkl>fcn yellowstoneW{ |
<lang zkl>fcn yellowstoneW{ // --> iterator |
||
Walker.zero().tweak(fcn(a,b){ |
Walker.zero().tweak(fcn(a,b){ |
||
foreach i in ([1..]){ |
foreach i in ([1..]){ |
||
| Line 275: | Line 275: | ||
Plot using Gnuplot |
Plot using Gnuplot |
||
<lang zkl>gnuplot:=System.popen("gnuplot","w"); |
<lang zkl>gnuplot:=System.popen("gnuplot","w"); |
||
gnuplot.writeln("plot '-'"); |
gnuplot.writeln("unset key; plot '-'"); |
||
yellowstoneW().pump( |
yellowstoneW().pump(1_000, gnuplot.writeln.fp(" ")); // " 1\n", " 2\n", ... |
||
gnuplot.writeln("e"); |
gnuplot.writeln("e"); |
||
gnuplot.flush(); |
gnuplot.flush(); |
||
ask("Hit return to finish"); gnuplot.close();</lang> |
ask("Hit return to finish"); gnuplot.close();</lang> |
||
Offsite Image: [http://www.zenkinetic.com/Images/RosettaCode/yellowstone1000.zkl.png yellowstone] |
|||