login
A044694
Numbers n such that string 6,8 occurs in the base 9 representation of n but not of n+1.
0
62, 143, 224, 305, 386, 467, 548, 566, 629, 710, 791, 872, 953, 1034, 1115, 1196, 1277, 1295, 1358, 1439, 1520, 1601, 1682, 1763, 1844, 1925, 2006, 2024, 2087, 2168, 2249, 2330, 2411, 2492, 2573, 2654, 2735, 2753, 2816
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 9], {6, 8}]>0, 1, 0], {n, 3000}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Feb 23 2018 *)
CROSSREFS
Sequence in context: A259738 A367092 A044313 * A238138 A332312 A104054
KEYWORD
nonn,base
STATUS
approved