|
|
A118324
|
|
(Greedy) Egyptian fraction expansion of log 2.
|
|
30
|
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
log(2) = 1/2 + 1/6 + 1/38 + 1/6071 + 1/144715221 + ...
|
|
MATHEMATICA
|
lst={}; k=N[Log[2], 1000]; Do[s=Ceiling[1/k]; AppendTo[lst, s]; k=k-1/s, {n, 12}]; lst (* _Vladimir Joseph Stephan Orlovsky_, Nov 02 2009 *)
|
|
PROG
|
(PARI) x=log(2); for (k=1, 8, d=ceil(1/x); x=x-1/d; print(d)) \\ _Jaume Oliver Lafont_, Feb 24 2009
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,frac
|
|
AUTHOR
|
_Eric W. Weisstein_, Apr 23 2006
|
|
EXTENSIONS
|
a(8) from _Jaume Oliver Lafont_, Feb 24 2009
|
|
STATUS
|
approved
|
|
|
|