Cullen and Woodall numbers: Difference between revisions

Add Factor
(→‎{{header|Lua}}: added Lua solution)
(Add Factor)
Line 300:
2 3 6 30 75 81 115 123 249 362 384 462
1 141 4713 5795 6611
</pre>
 
=={{header|Factor}}==
{{works with|Factor|0.99 2022-04-03}}
<lang factor>USING: arrays kernel math math.vectors prettyprint ranges
sequences ;
 
20 [1..b] [ dup 2^ * 1 + ] map dup 2 v-n 2array simple-table.</lang>
{{out}}
<pre>
3 9 25 65 161 385 897 2049 4609 10241 22529 49153 106497 229377 491521 1048577 2228225 4718593 9961473 20971521
1 7 23 63 159 383 895 2047 4607 10239 22527 49151 106495 229375 491519 1048575 2228223 4718591 9961471 20971519
</pre>
 
1,808

edits