login
A044581
Numbers n such that string 1,5 occurs in the base 8 representation of n but not of n+1.
1
13, 77, 111, 141, 205, 269, 333, 397, 461, 525, 589, 623, 653, 717, 781, 895, 909, 973, 1037, 1101, 1135, 1165, 1229, 1293, 1357, 1421, 1485, 1549, 1613, 1647, 1677, 1741, 1805, 1869, 1933, 1997, 2061, 2125, 2159, 2189, 2253, 2317, 2381, 2445, 2509, 2573
OFFSET
1,1
MATHEMATICA
f[n_] := Length[StringPosition[ToString[FromDigits[IntegerDigits[n, 8]]], "15", 1]]; a = Select[Table[n, {n, 10000}], f[#] > 0 && f[# + 1] == 0 &] (* Vladimir Joseph Stephan Orlovsky, Jul 16 2011 *)
CROSSREFS
Cf. A044200.
Sequence in context: A060717 A044200 A329109 * A126423 A072474 A186103
KEYWORD
nonn,base
STATUS
approved