OFFSET
0,8
COMMENTS
This sequence gives the number of "first-level" carries produced when computing Fibonacci numbers in binary arithmetic. that is, the carry-1-bits produced at the positions where the both summands F(n) and F(n+1) have 1-bits in the same bit-positions. This sum doesn't include any additional carries produced, when a produced carry-bit is added to an existing 1 at its left side.
LINKS
Antti Karttunen, Table of n, a(n) for n = 0..1000
EXAMPLE
F_7 = 13, ......01101 in binary.
F_8 = 21, ......10101 in binary.
--------------------------
Anded together: 00101
which has two 1-bits, thus a(7)=2.
MATHEMATICA
a[n_] := DigitCount[BitAnd[Fibonacci[n], Fibonacci[n+1]], 2, 1]; Array[a, 100, 0] (* Amiram Eldar, Jul 22 2023 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Antti Karttunen, Dec 03 2012
STATUS
approved