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