|
%I #12 Mar 11 2013 13:40:30
%S 1,1,3,0,2,5,13,55,21,987,8,89,233,377,34,1597,28657,6765,144,610,
%T 17711,196418,514229,2584,4181,10946,121393,317811,3524578,46368,
%U 1346269,1836311903,75025,5702887,24157817,102334155,165580141,832040,14930352,701408733
%N Irregular triangle of conjectured Fibonacci numbers with exactly n 0-bits in their binary representation.
%H T. D. Noe, <a href="/A222602/b222602.txt">Rows n = 0..500 of irregular triangle, flattened</a>
%e The irregular triangle begins
%e {1, 1, 3},
%e {0, 2, 5, 13, 55},
%e {21, 987},
%e {8, 89, 233, 377},
%e {34, 1597, 28657},
%e {6765},
%e {144, 610},
%e {17711, 196418, 514229},
%e {2584, 4181, 10946, 121393, 317811},
%e {3524578}, {46368, 1346269, 1836311903},
%e {75025, 5702887, 24157817, 102334155, 165580141},
%e {832040, 14930352, 701408733}
%t f = Fibonacci[Range[0,1000]]; Table[Select[f, Count[IntegerDigits[#, 2], 0] == n &], {n, 0, 20}]
%Y Cf. A004685 (Fibonacci numbers in binary), A214853 (one 0-bit), A222601.
%Y Cf. A222295, A222296, A222757, A222758.
%K nonn,tabf
%O 0,3
%A _T. D. Noe_, Mar 08 2013
|
