A143299 Number of terms in the Zeckendorf representation of every number in row n of the Wythoff array.
1, 2, 2, 2, 3, 2, 3, 3, 2, 3, 3, 3, 4, 2, 3, 3, 3, 4, 3, 4, 4, 2, 3, 3, 3, 4, 3, 4, 4, 3, 4, 4, 4, 5, 2, 3, 3, 3, 4, 3, 4, 4, 3, 4, 4, 4, 5, 3, 4, 4, 4, 5, 4, 5, 5, 2, 3, 3, 3, 4, 3, 4, 4, 3, 4, 4, 4, 5, 3, 4, 4, 4, 5, 4, 5, 5, 3, 4, 4, 4, 5, 4, 5, 5, 4, 5, 5, 5, 6, 2, 3, 3, 3, 4, 3, 4, 4, 3, 4, 4, 4, 5, 3, 4, 4
Offset: 1
Keywords
Examples
Row 5 of the Wythoff array is (12, 20, 32, ...) and corresponding Zeckendorf representations all have 3 terms: 12 = 1 + 3 + 8, 20 = 2 + 5 + 13, 32 = 3 + 8 + 21, etc. From _Joerg Arndt_, May 14 2011: (Start) The sequence as an irregular triangle: 1, = M(1) 1, = M(2) 1, 2, = M(3) = M(2).f(M(1)) 1, 2, 2, = M(4) = M(3).f(M(2)) 1, 2, 2, 2, 3, 1, 2, 2, 2, 3, 2, 3, 3, 1, 2, 2, 2, 3, 2, 3, 3, 2, 3, 3, 3, 4, 1, 2, 2, 2, 3, 2, 3, 3, 2, 3, 3, 3, 4, 2, 3, 3, 3, 4, 3, 4, 4, 1, 2, 2, 2, 3, 2, 3, 3, 2, 3, 3, 3, 4, 2, 3, 3, 3, 4, 3, 4, 4, 2, 3, 3, 3, ... (End)
Links
- Paolo Xausa, Table of n, a(n) for n = 1..10946
Programs
-
Mathematica
Flatten[Nest[{Flatten[#], #[[1]] + 1} &, {1, 2}, 9]] (* Paolo Xausa, Jun 17 2024 *)
Formula
a(n) = A007895(n-1) + 1. - Paolo Xausa, Jun 17 2024
Comments