Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?

Re^4: ulam's spiral too slow

by orange (Beadle)
on Apr 17, 2007 at 07:22 UTC ( #610475=note: print w/replies, xml ) Need Help??

in reply to Re^3: ulam's spiral too slow
in thread ulam's spiral too slow

thanks, your code is much faster than mine, and now it produce the same figure as in the
after we invert the colors
one small note is that your code will plot number 1 as a prime number, we can find this if we insert
print "number of primes = $NumOfPrimes \n"; before the mainloop; and try the program with number 10 , it will give us the number of primes is 5
as a variation i suggest for the invistigators for small spirals to replace the main plotting code:
$c->createText( $x*+$o, $y+$o, -fill => "$colr", -text => '.'); with
$c->createText( $x*30+$o, $y*30+$o, -fill => "$colr", -text => "$num"); so we can see numbers instead of dots in wich the primes will be in white color , the factor 30 above is for magnification of the plotting.

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://610475]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (3)
As of 2021-07-26 17:20 GMT
Find Nodes?
    Voting Booth?

    No recent polls found