login
A044658
Numbers n such that string 2,8 occurs in the base 9 representation of n but not of n+1.
0
26, 107, 188, 242, 269, 350, 431, 512, 593, 674, 755, 836, 917, 971, 998, 1079, 1160, 1241, 1322, 1403, 1484, 1565, 1646, 1700, 1727, 1808, 1889, 1970, 2051, 2186, 2213, 2294, 2375, 2429, 2456, 2537, 2618, 2699, 2780, 2861
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 9], {2, 8}]>0, 1, 0], {n, 3000}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jun 23 2018 *)
CROSSREFS
Sequence in context: A042322 A042324 A044277 * A024381 A262756 A262476
KEYWORD
nonn,base
STATUS
approved