login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A044599
Numbers n such that string 3,7 occurs in the base 8 representation of n but not of n+1.
0
31, 95, 159, 223, 255, 287, 351, 415, 479, 543, 607, 671, 735, 767, 799, 863, 927, 991, 1055, 1119, 1183, 1247, 1279, 1311, 1375, 1439, 1503, 1567, 1631, 1695, 1759, 1791, 1823, 1887, 1951, 2047, 2079, 2143, 2207, 2271, 2303
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 8], {3, 7}]>0, 1, 0], {n, 2500}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Nov 10 2017 *)
CROSSREFS
Sequence in context: A042896 A042898 A044218 * A143032 A159014 A256323
KEYWORD
nonn,base
STATUS
approved