This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A097052 First occurrence of n in A096036 or 0 if n does not appear. 1

%I

%S 1,2,5,7,19,17,25,29,0,73,65,67,99,97,113,121,0,0,301,289,0,257,265,

%T 277,393,401,421,385,451,449,481,497,0,0,0,0,0,1201,1161,1153,0,0,

%U 1025,1033,1059,1057,1105,1129,0,1569,1613,1601,1681,1697,1537,1541,1801,1825

%N First occurrence of n in A096036 or 0 if n does not appear.

%C Not appearing in A096036 are 9, 17, 18, 21, 33, 34, 35, 36, 37, 41, 42, 49, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 77, 81, 82, 83, 84, 85, 97, 98, 105, ...,.

%F A096036: a(n)= ceiling(n/a(ceiling(n/2))) with a(1) = 1.

%t a[1] = 1; a[n_] := a[n] = Ceiling[ n / a[ Ceiling[n/2]]]; t = Table[ a[n], {n, 2000}]; b[n_] := Block[{p = Position[t, n, 1, 1]}, If[p == {}, 0, p]]; Flatten[ Table[ b[n], {n, 60}]]

%Y Cf. A096036.

%K nonn

%O 1,2

%A _Reinhard Zumkeller_ and _Robert G. Wilson v_, Jul 21 2004

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .

Last modified May 20 01:08 EDT 2013. Contains 225445 sequences.