login
A044604
Numbers n such that string 4,4 occurs in the base 8 representation of n but not of n+1.
0
36, 100, 164, 228, 295, 356, 420, 484, 548, 612, 676, 740, 807, 868, 932, 996, 1060, 1124, 1188, 1252, 1319, 1380, 1444, 1508, 1572, 1636, 1700, 1764, 1831, 1892, 1956, 2020, 2084, 2148, 2212, 2276, 2367, 2404, 2468, 2532
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 8], {4, 4}]>0, 1, 0], {n, 2600}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jan 21 2018 *)
CROSSREFS
Sequence in context: A062703 A043438 A044223 * A375144 A340017 A303606
KEYWORD
nonn,base
STATUS
approved