A373360 First differences of A373347.

2, 2, 2, 2, 2, 1, 1, 2, 2, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 2, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 1, 1, 1, 1, 2, 2, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 1, 1, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1

Offset: 1

Author

Paolo Xausa, Jun 07 2024

Keywords

• nonn

Comments

This sequence contains only 1's and 2's.

Links

• Paolo Xausa, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A373303, A373347.

Programs

Mathematica

Differences[Select[Range[200], DigitSum[#, 2] > IntegerExponent[#, 2] + 1 &]]

Formula

a(n) = A373347(n+1) - A373347(n).