OFFSET
1,1
COMMENTS
A136676(k) = Numerator of Sum_{j=1..k} (-1)^(j+1)/j^5.
LINKS
Eric Weisstein's World of Mathematics, Harmonic Number
MATHEMATICA
Do[ f=Numerator[ Sum[ (-1)^(k+1)*1/k^5, {k, 1, n} ] ]; If[ PrimeQ[f], Print[ {n, f} ] ], {n, 1, 130} ]
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Alexander Adamchuk, Jan 16 2008
EXTENSIONS
a(7)-a(8) from Amiram Eldar, Mar 14 2019
a(9)-a(15) from Robert Price, Apr 16 2019
STATUS
approved