Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: Hamming Sequences and Lazy Lists

by Roy Johnson (Monsignor)
on Mar 17, 2005 at 18:00 UTC ( #440460=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    use strict; 
    use warnings;
    ...
    }
    
    print join(', ', lazy_ham(1000)), "\n";
    
  2. or download this
    2, 3, 4, 5, 6, 8, 9, 10, 12, 15, 16, 18, 20, 24, 25, 27, 30, 32, 36, 4
    +0, 45, 48, 50, 54, 60, 64, 72, 75, 80, 81, 90, 96, 100, 108, 120, 125
    +, 128, 135, 144, 150, 160, 162, 180, 192, 200, 216, 225, 240, 243, 25
    +0, 256, 270, 288, 300, 320, 324, 360, 375, 384, 400, 405, 432, 450, 4
    +80, 486, 500, 512, 540, 576, 600, 625, 640, 648, 675, 720, 729, 750, 
    +768, 800, 810, 864, 900, 960, 972, 1000, 1024, 1080, 1125, 1152, 1200
    +, 1215, 1250, 1280, 1296, 1350, 1440, 1458, 1500, 1536, 1600, 1620, 1
    +728, 1800, 1875,...
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://440460]
help
Chatterbox?
[marinersk]: Corion This DBA wants to smack others who like putting whitespace in column names.
[marinersk]: s/smack/whap/;
[talexb]: Wow, what hilariously bad form.
[SuicideJunkie]: Just wait; someday soon, you'll be given a DB with unicode emojis in the column names.
[Corion]: marinersk: Well, I have done select statements like select sum(foo) as "Total Amount", ..., but to have a table like that makes me shudder
[Corion]: SuicideJunkie: :-D

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (10)
As of 2017-05-25 14:58 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?