login
A044606
Numbers n such that string 4,6 occurs in the base 8 representation of n but not of n+1.
0
38, 102, 166, 230, 294, 311, 358, 422, 486, 550, 614, 678, 742, 806, 823, 870, 934, 998, 1062, 1126, 1190, 1254, 1318, 1335, 1382, 1446, 1510, 1574, 1638, 1702, 1766, 1830, 1847, 1894, 1958, 2022, 2086, 2150, 2214, 2278, 2342
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 8], {4, 6}]>0, 1, 0], {n, 2500}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Apr 09 2018 *)
CROSSREFS
Sequence in context: A020167 A186439 A044225 * A244177 A251236 A283804
KEYWORD
nonn,base
STATUS
approved