Padovan n-step number sequences: Difference between revisions
added RPL
(Added Easylang) |
(added RPL) |
||
Line 1,748:
8 │ 1 1 1 2 3 5 8 13 21 34 54 87 140 225 362
───┴──────────────────────────────────────────
</pre>
=={{header|Ruby}}==
{{works with|HP|49}}
« → n t
« '''IF''' n 2 ≤ t 3 ≤ OR '''THEN'''
1 n 1 + NDUPN →LIST
'''ELSE'''
n 1 - n <span style="color:blue">NPADOVAN</span>
'''END'''
'''WHILE''' DUP SIZE t < '''REPEAT'''
DUP DUP SIZE DUP n - SWAP 1 - SUB ∑LIST +
'''END'''
» » '<span style="color:blue">NPADOVAN</span>' STO
« n 15 <span style="color:blue">NPADOVAN</span> » 'n' 2 8 1 SEQ
{{out}}
<pre>
1: { { 1 1 1 2 2 3 4 5 7 9 12 16 21 28 37 }
{ 1 1 1 2 3 4 6 9 13 19 28 41 60 88 129 }
{ 1 1 1 2 3 5 7 11 17 26 40 61 94 144 221 }
{ 1 1 1 2 3 5 8 12 19 30 47 74 116 182 286 }
{ 1 1 1 2 3 5 8 13 20 32 51 81 129 205 326 }
{ 1 1 1 2 3 5 8 13 21 33 53 85 136 218 349 }
{ 1 1 1 2 3 5 8 13 21 34 54 87 140 225 362 } }
</pre>
| |||