login
A043184
Numbers k such that 0 and 5 occur juxtaposed in the base-9 representation of k but not of k-1.
0
45, 86, 126, 167, 207, 248, 288, 329, 369, 405, 450, 491, 531, 572, 612, 653, 693, 734, 774, 815, 855, 896, 936, 977, 1017, 1058, 1098, 1134, 1179, 1220, 1260, 1301, 1341, 1382, 1422, 1463, 1503, 1544, 1584, 1625, 1665, 1706
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 9], {0, 5}]>0 || SequenceCount[ IntegerDigits[n, 9], {5, 0}]>0, 1, 0], {n, 1800}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, May 22 2018 *)
CROSSREFS
Cf. A007095.
Sequence in context: A305154 A280407 A063343 * A039361 A043964 A140380
KEYWORD
nonn,base
STATUS
approved