A044769 - OEIS

A044769

Numbers n such that string 5,6 occurs in the base 10 representation of n but not of n+1.

56, 156, 256, 356, 456, 556, 569, 656, 756, 856, 956, 1056, 1156, 1256, 1356, 1456, 1556, 1569, 1656, 1756, 1856, 1956, 2056, 2156, 2256, 2356, 2456, 2556, 2569, 2656, 2756, 2856, 2956, 3056, 3156, 3256, 3356, 3456, 3556

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

MATHEMATICA

Transpose[SequencePosition[Table[If[SequenceCount[IntegerDigits[n], {5, 6}]>0, 1, 0], {n, 4000}], {1, 0}]][[1]] (* The program uses the SequencePosition and SequenceCount functions from Mathematica version 10 *) (* Harvey P. Dale, Jul 21 2015 *)

CROSSREFS

Sequence in context: A220042 A220008 A044388 * A154034 A225324 A225358

Adjacent sequences: A044766 A044767 A044768 * A044770 A044771 A044772

KEYWORD

nonn,base

AUTHOR

Clark Kimberling

STATUS

approved