Cullen and Woodall numbers: Difference between revisions
Content added Content deleted
m (Rust - replace to_string_radix by to_string) |
Drkameleon (talk | contribs) (Added Arturo implementation) |
||
Line 101: | Line 101: | ||
Index of the 1st 12 Woodall primes: 2 3 6 30 75 81 115 123 249 362 384 462 |
Index of the 1st 12 Woodall primes: 2 3 6 30 75 81 115 123 249 362 384 462 |
||
</pre> |
</pre> |
||
=={{header|Arturo}}== |
|||
<lang rebol>cullen: function [n]-> |
|||
inc n * 2^n |
|||
woodall: function [n]-> |
|||
dec n * 2^n |
|||
print ["First 20 cullen numbers:" join.with:" " to [:string] map 1..20 => cullen] |
|||
print ["First 20 woodall numbers:" join.with:" " to [:string] map 1..20 => woodall]</lang> |
|||
{{out}} |
|||
<pre>First 20 cullen numbers: 3 9 25 65 161 385 897 2049 4609 10241 22529 49153 106497 229377 491521 1048577 2228225 4718593 9961473 20971521 |
|||
First 20 woodall numbers: 1 7 23 63 159 383 895 2047 4607 10239 22527 49151 106495 229375 491519 1048575 2228223 4718591 9961471 20971519</pre> |
|||
=={{header|AWK}}== |
=={{header|AWK}}== |
||
<lang AWK> |
<lang AWK> |