A293677 - OEIS

%I #9 Feb 17 2018 10:44:11

%S 0,3,3,6,9,15,25,40,65,106,172,279,452,731,1184,1916,3100,5017,8117,

%T 13134,21252,34387,55640,90028,145669,235697,381367,617065,998432,

%U 1615498,2613930,4229428,6843359,11072788,17916147,28988936,46905084,75894020,122799104

%N a(n) is the greatest integer k such that k/Fibonacci(n) < Pi.

%H Clark Kimberling, <a href="/A293677/b293677.txt">Table of n, a(n) for n = 0..1000</a>

%F a(n) = floor(Pi*Fibonacci(n)).

%F a(n) = A293678(n) - 1 for n > 0.

%t z = 120; f[n_] := Fibonacci[n];

%t Table[Floor[Pi*f[n]], {n, 0, z}];   (* A293677 *)

%t Table[Ceiling[Pi*f[n]], {n, 0, z}]; (* A293678 *)

%t Table[Round[Pi*f[n]], {n, 0, z}];   (* A293696 *)

%Y Cf. A000045, A000796, A293678, A293679.

%K nonn,easy

%O 0,2

%A _Clark Kimberling_, Oct 16 2017