[go: up one dir, main page]

login
A117579
Numerator of Sum[i=1..n] 1/(p(i)^p(i)), p(i) = i-th prime.
7
1, 31, 96983, 79870008269, 22787845491220720044859, 6901871132161346809864777612017764827, 5709505682874900155174610004469973097336266239002423739879, 11295798267103963562742898223286548990219261148710007871289771185589362412305596041
OFFSET
1,2
FORMULA
a(n) = Numerator of Sum[i=1..n] 1/(p(i)^p(i)). a(n) = Numerator of Sum[i=1..n] 1/(A000040(i)^A000040(i)). a(n) = Numerator of Sum[i=1..n] 1/A051674(i).
EXAMPLE
1/4, 31/108, 96983/337500, 79870008269/277945762500, 22787845491220720044859/79301169838123235887500,
6901871132161346809864777612017764827/24018350267611933650627567399079537500
MATHEMATICA
Numerator[Accumulate[1/#^#&/@Prime[Range[10]]]] (* Harvey P. Dale, Jan 24 2013 *)
CROSSREFS
Denominators = A076265.
Sequence in context: A263163 A188956 A218142 * A249584 A351135 A107122
KEYWORD
easy,frac,nonn
AUTHOR
Jonathan Vos Post, Mar 29 2006
EXTENSIONS
Corrected and extended by Harvey P. Dale, Jan 24 2013
STATUS
approved