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,2

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

Mathematica

SequencePosition[Mod[DigitCount[Select[Range[0, 3000], BitAnd[#, 2 #] == 0 &], 2, 1], 2], {1, 1}][[;; , 1]] - 1 (* Amiram Eldar, Feb 05 2023 *)

Crossrefs

Cf. A020899, A095096, A337287, A337288, A337289, A337634, A337635, A337636, A337637.

Sequence in context: A048001 A109299 A216629 * A259409 A073257 A240905

Adjacent sequences: A337287 A337288 A337289 * A337291 A337292 A337293

Keyword

nonn,base

Author

N. J. A. Sloane, Sep 12 2020

Status

approved