login
A044285
Numbers n such that string 3,7 occurs in the base 9 representation of n but not of n-1.
0
34, 115, 196, 277, 306, 358, 439, 520, 601, 682, 763, 844, 925, 1006, 1035, 1087, 1168, 1249, 1330, 1411, 1492, 1573, 1654, 1735, 1764, 1816, 1897, 1978, 2059, 2140, 2221, 2302, 2383, 2464, 2493, 2545, 2626, 2707, 2754
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 9], {3, 7}]>0, 1, 0], {n, 3000}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Oct 25 2017 *)
CROSSREFS
Sequence in context: A282854 A165222 A173308 * A044666 A105088 A039521
KEYWORD
nonn,base
STATUS
approved