A043102 Numbers k such that 0 and 3 occur juxtaposed in the base-4 representation of k but not of k-1.

12, 19, 28, 35, 44, 48, 60, 67, 76, 83, 92, 99, 108, 112, 124, 131, 140, 147, 156, 163, 172, 176, 188, 192, 211, 220, 227, 236, 240, 252, 259, 268, 275, 284, 291, 300, 304, 323, 332, 339, 348, 355, 364, 368, 380, 387, 396, 403

Offset

1,1

Links

Table of n, a(n) for n=1..48.

Mathematica

SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 4], {0, 3}]>0 || SequenceCount[IntegerDigits[n, 4], {3, 0}]>0, 1, 0], {n, 500}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jun 21 2021 *)

Crossrefs

Cf. A007090.

Sequence in context: A053752 A291939 A349986 * A039279 A045067 A043882

Adjacent sequences: A043099 A043100 A043101 * A043103 A043104 A043105

Keyword

nonn,base

Author

Clark Kimberling

Status

approved