Home primes: Difference between revisions
Content added Content deleted
(Add Factor) |
m (→{{header|Factor}}: tweak output) |
||
Line 56: | Line 56: | ||
: chain. ( n -- ) |
: chain. ( n -- ) |
||
chain [ last ] [ ] bi unclip "HP% |
chain [ last ] [ ] bi unclip "HP%d = " printf |
||
[ 1 + "HP%d(%d) = " printf ] each-index . ; |
[ 1 + "HP%d(%d) = " printf ] each-index . ; |
||
Line 62: | Line 62: | ||
{{out}} |
{{out}} |
||
<pre> |
<pre> |
||
HP2 = 2 |
|||
HP3 = 3 |
|||
HP4 = HP22(1) = HP211(2) = 211 |
|||
HP5 = 5 |
|||
HP6 = HP23(1) = 23 |
|||
HP7 = 7 |
|||
HP8 = HP222(1) = HP2337(2) = HP31941(3) = HP33371313(4) = HP311123771(5) = HP7149317941(6) = HP22931219729(7) = HP112084656339(8) = HP3347911118189(9) = HP11613496501723(10) = HP97130517917327(11) = HP531832651281459(12) = HP3331113965338635107(13) = 3331113965338635107 |
|||
HP9 = HP33(1) = HP311(2) = 311 |
|||
HP10 = HP25(1) = HP55(2) = HP511(3) = HP773(4) = 773 |
HP10 = HP25(1) = HP55(2) = HP511(3) = HP773(4) = 773 |
||
HP11 = 11 |
HP11 = 11 |