A136685 Numbers k such that A136676(k) is prime.
2, 19, 51, 78, 84, 130, 294, 910, 2223, 2642, 3261, 4312, 4973, 7846, 9439
Offset: 1
Links
- Eric Weisstein's World of Mathematics, Harmonic Number
Crossrefs
Programs
-
Mathematica
Do[ f=Numerator[ Sum[ (-1)^(k+1)*1/k^5, {k,1,n} ] ]; If[ PrimeQ[f], Print[ {n,f} ] ], {n,1,130} ]
Extensions
a(7)-a(8) from Amiram Eldar, Mar 14 2019
a(9)-a(15) from Robert Price, Apr 16 2019
Comments