login
A044680
Numbers n such that string 5,3 occurs in the base 9 representation of n but not of n+1.
0
48, 129, 210, 291, 372, 440, 453, 534, 615, 696, 777, 858, 939, 1020, 1101, 1169, 1182, 1263, 1344, 1425, 1506, 1587, 1668, 1749, 1830, 1898, 1911, 1992, 2073, 2154, 2235, 2316, 2397, 2478, 2559, 2627, 2640, 2721, 2802
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 9], {5, 3}]>0, 1, 0], {n, 3000}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Aug 25 2019 *)
CROSSREFS
Sequence in context: A260362 A114444 A044299 * A211500 A295428 A118145
KEYWORD
nonn,base
STATUS
approved