login
A044663
Numbers n such that string 3,4 occurs in the base 9 representation of n but not of n+1.
1
31, 112, 193, 274, 287, 355, 436, 517, 598, 679, 760, 841, 922, 1003, 1016, 1084, 1165, 1246, 1327, 1408, 1489, 1570, 1651, 1732, 1745, 1813, 1894, 1975, 2056, 2137, 2218, 2299, 2380, 2461, 2474, 2591, 2623, 2704, 2785
OFFSET
1,1
LINKS
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 9], {3, 4}]>0, 1, 0], {n, 3000}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Apr 06 2019 *)
CROSSREFS
Sequence in context: A281194 A063397 A044282 * A142228 A304241 A204735
KEYWORD
nonn,base
STATUS
approved