A043888 Numbers k such that 0 and 3 occur juxtaposed in the base-5 representation of k but not of k+1.

15, 28, 40, 53, 65, 79, 90, 103, 115, 128, 144, 153, 165, 178, 190, 204, 215, 228, 240, 253, 269, 278, 290, 303, 315, 329, 340, 353, 365, 399, 403, 415, 428, 440, 454, 465, 478, 490, 503, 519, 528, 540, 553, 565, 579, 590, 603

Offset

1,1

Links

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

Mathematica

SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 5], {0, 3}]>0 || SequenceCount[IntegerDigits[n, 5], {3, 0}]>0, 1, 0], {n, 700}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Mar 29 2020 *)

Crossrefs

Cf. A007091.

Sequence in context: A043108 A045192 A039285 * A350045 A357278 A343067

Adjacent sequences: A043885 A043886 A043887 * A043889 A043890 A043891

Keyword

nonn,base

Author

Clark Kimberling

Status

approved