A044669 Numbers n such that string 4,1 occurs in the base 9 representation of n but not of n+1.

37, 118, 199, 280, 341, 361, 442, 523, 604, 685, 766, 847, 928, 1009, 1070, 1090, 1171, 1252, 1333, 1414, 1495, 1576, 1657, 1738, 1799, 1819, 1900, 1981, 2062, 2143, 2224, 2305, 2386, 2467, 2528, 2548, 2629, 2710, 2791

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Mathematica

Transpose[SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 9], {4, 1}]>0, 1, 0], {n, 3000}], {1, 0}]][[1]] (* The program uses the SequencePosition and SequenceCount functions from Mathematica version 10 *) (* Harvey P. Dale, Feb 28 2016 *)

Crossrefs

Sequence in context: A138638 A193105 A044288 * A048510 A250891 A250898

Adjacent sequences: A044666 A044667 A044668 * A044670 A044671 A044672

Keyword

nonn,base

Author

Clark Kimberling

Status

approved