%I A139522
%S A139522 2,7,23,149,9967,27514363,217357018990141,1606507138380520696666019221,
%T A139522 25278175600230973831063754126661264411663401021548343,
%U A139522 2658247789993020763205588174060503375422404932907883834101966812060033051648561545028435381434723862291
%N A139522 Denominators of an Egyptian fraction for ln(2), using only prime numbers 
               and allowing repetitions.
%C A139522 Good approximation up to 800 decimal digits
%p A139522 P:=proc(n) local a,i; a:=evalf(ln(2),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 A139522 Cf. A139514-A139521, A139523.
%Y A139522 Sequence in context: A049021 A002494 A032264 this_sequence A163158 A112089 
               A075062
%Y A139522 Adjacent sequences: A139519 A139520 A139521 this_sequence A139523 A139524 
               A139525
%K A139522 easy,nonn,frac
%O A139522 0,1
%A A139522 Paolo P. Lava & Giorgio Balzarotti (ppl(AT)spl.at), Apr 28 2008