login
Denominators of an Egyptian fraction for log(Pi), using only prime numbers and allowing repetitions.
9

%I #6 Sep 02 2013 03:08:29

%S 2,2,7,541,41131,627169013,81471206061859301,

%T 932806453618297780249534047168397,

%U 4107347676766564181856839919490854246701477594547905851748592091

%N Denominators of an Egyptian fraction for log(Pi), using only prime numbers and allowing repetitions.

%C Good approximation up to 799 decimal digits

%p P:=proc(n) local a,i; a:=evalf(ln(Pi)-1,100); for i from 1 by 1 to n do if 1/ithprime(i)<a then a:=a-1/ithprime(i); print(a); print(ithprime(i)); fi; od; end: P(100000);

%Y Cf. A139514-A139522.

%K easy,nonn,frac

%O 0,1

%A _Paolo P. Lava_ and _Giorgio Balzarotti_, Apr 28 2008