|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|