Fibonacci n-step number sequences: Difference between revisions
m
→{{header|Haskell}}
m (→{{header|Haskell}}: Added an example using unfoldr) |
|||
Line 2,110:
( ("lucas:" : fmap show (take 15 a000032)) :
zipWith
( \k n ->
(k <> "nacci:") :
fmap
show
(take 15 $ nStepFibonacci n)
)
(words "fibo tribo tetra penta hexa hepta octo nona deca")
[2 ..]
Line 2,133 ⟶ 2,138:
<pre>Recurrence relation sequences:
lucas: 2 1 3 4 7 11 18 29 47 76 123 199 322 521 843
=={{header|Icon}} and {{header|Unicon}}==
|