A337290 Numbers k such that both k and k+1 are in A020899.
1, 2, 12, 19, 20, 27, 30, 31, 40, 43, 44, 48, 49, 61, 64, 65, 69, 70, 77, 78, 88, 95, 98, 99, 103, 104, 111, 112, 124, 125, 135, 142, 143, 150, 153, 154, 158, 159, 166, 167, 179, 180, 190, 197, 200, 201, 211, 218, 219, 226, 229, 230, 239, 242, 243, 247, 248, 255, 256, 268, 269, 279
Offset: 1
References
- Anton Shutov, On the sum of digits of the Zeckendorf representations of two consecutive numbers, Fib. Q., 58:3 (2020), 203-207.
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
SequencePosition[Mod[DigitCount[Select[Range[0, 3000], BitAnd[#, 2 #] == 0 &], 2, 1], 2], {1, 1}][[;; , 1]] - 1 (* Amiram Eldar, Feb 05 2023 *)