Hamming numbers: Difference between revisions
m
→{{header|Lambdatalk}}
m (→{{header|Lambdatalk}}: minor edit) |
|||
Line 6,684:
=={{header|Lambdatalk}}==
<syntaxhighlight lang="scheme">
{def hamming
{def hamming.loop
Line 6,720 ⟶ 6,721:
{hamming 1691}
-> 2125764000 // < 200ms
Currently limited to javascript's integers and by stackoverflow on some computers.
</syntaxhighlight>
<h3>2.1) compute</h3>▼
Build a table of 2^i•3^j•5^k from i,j,k = 0 to n and sort it.
<syntaxhighlight lang="scheme">
{def ham
{lambda {:n}
Line 6,750 ⟶ 6,756:
-> 2125764000 // on my macbook pro
</syntaxhighlight>
<h3>2.2) display</h3>▼
Display a hamming number as 2^a•3^b•5^c▼
<syntaxhighlight lang="scheme">
{def factor
Line 6,811 ⟶ 6,821:
18: 32 = 2^5•3^0•5^0
19: 36 = 2^2•3^2•5^0
</syntaxhighlight>
See http://lambdaway.free.fr/lambdawalks/?view=hamming_numbers3 for a better display as 2<sup>a</sup>•3<sup>b</sup>•5<sup>c</sup>.
=={{header|Liberty BASIC}}==
| |||