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

8, 16, 33, 44, 58, 66, 84, 91, 108, 116, 133, 141, 158, 169, 183, 191, 224, 233, 241, 258, 266, 283, 294, 308, 316, 334, 341, 358, 366, 383, 391, 424, 433, 441, 459, 466, 483, 491, 508, 516, 533, 544, 558, 566, 584, 591, 608, 616

Offset

1,1

Links

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

Mathematica

SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 5], {1, 3}]>0||SequenceCount[ IntegerDigits[n, 5], {3, 1}]>0, 1, 0], {n, 650}], {1, 0}][[All, 1]] (* Harvey P. Dale, Jul 31 2022 *)

Crossrefs

Cf. A007091.

Sequence in context: A291124 A239280 A043111 * A331930 A072578 A271994

Adjacent sequences: A043888 A043889 A043890 * A043892 A043893 A043894

Keyword

nonn,base

Author

Clark Kimberling

Status

approved