login
A044242
Numbers n such that string 6,7 occurs in the base 8 representation of n but not of n-1.
0
55, 119, 183, 247, 311, 375, 439, 503, 567, 631, 695, 759, 823, 887, 951, 1015, 1079, 1143, 1207, 1271, 1335, 1399, 1463, 1527, 1591, 1655, 1719, 1783, 1847, 1911, 1975, 2039, 2103, 2167, 2231, 2295, 2359, 2423, 2487, 2551
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 8], {6, 7}]>0, 1, 0], {n, 2600}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Dec 31 2017 *)
CROSSREFS
Sequence in context: A282768 A217429 A154031 * A044623 A063345 A080701
KEYWORD
nonn,base
STATUS
approved