A044378 Numbers n such that string 4,6 occurs in the base 10 representation of n but not of n-1.

46, 146, 246, 346, 446, 460, 546, 646, 746, 846, 946, 1046, 1146, 1246, 1346, 1446, 1460, 1546, 1646, 1746, 1846, 1946, 2046, 2146, 2246, 2346, 2446, 2460, 2546, 2646, 2746, 2846, 2946, 3046, 3146, 3246, 3346, 3446, 3460

Offset

1,1

Links

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

Mathematica

SequencePosition[Table[If[SequenceCount[IntegerDigits[n], {4, 6}]>0, 1, 0], {n, 4000}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jul 15 2019 *)

Crossrefs

Sequence in context: A122513 A252687 A053019 * A044759 A223607 A189809

Adjacent sequences: A044375 A044376 A044377 * A044379 A044380 A044381

Keyword

nonn,base

Author

Clark Kimberling

Status

approved