login
Denominators of Egyptian fraction expansion of Pi.
3

%I #16 Feb 10 2015 09:04:56

%S 1,1,1,8,61,5020,128541455,162924332716605980,

%T 28783052231699298507846309644849796,

%U 871295615653899563300996782209332544845605756266650946342214549769447

%N Denominators of Egyptian fraction expansion of Pi.

%C Included for completeness. A001466 is the main entry.

%t lst={}; k=N[(Pi), 1000]; Do[s=Ceiling[1/k]; AppendTo[lst, s]; k=k-1/s, {n, 12}]; lst (* based on the Mma program from _Vladimir Joseph Stephan Orlovsky_ in A001466 *)

%Y Cf. A001466, A224230.

%K nonn

%O 0,4

%A _N. J. A. Sloane_, Apr 21 2012