login
A044679
Numbers n such that string 5,2 occurs in the base 9 representation of n but not of n+1.
0
47, 128, 209, 290, 371, 431, 452, 533, 614, 695, 776, 857, 938, 1019, 1100, 1160, 1181, 1262, 1343, 1424, 1505, 1586, 1667, 1748, 1829, 1889, 1910, 1991, 2072, 2153, 2234, 2315, 2396, 2477, 2558, 2618, 2639, 2720, 2801
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 9], {5, 2}]>0, 1, 0], {n, 3000}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, May 05 2019 *)
CROSSREFS
Sequence in context: A118091 A235176 A044298 * A350863 A253225 A039530
KEYWORD
nonn,base
STATUS
approved