login
A136369
Numbers k such that A136368(k) is prime.
6
2, 5, 6, 8, 18, 20, 98, 1863
OFFSET
1,1
MATHEMATICA
f=0; Do[ p=Prime[n]; f=f + (-1)^(n+1)*1/p^2; g=Numerator[f] ; If[ PrimeQ[g], Print[ {n, g} ] ], {n, 1, 100} ]
CROSSREFS
Cf. A024530 (numerator of Sum_{k=1..n} (-1)^k / prime(k)).
Cf. A136368 (numerator of Sum_{k=1..n} (-1)^(k+1)/prime(k)^2).
Sequence in context: A271430 A326854 A097685 * A305511 A269472 A351830
KEYWORD
nonn,more
AUTHOR
Alexander Adamchuk, Dec 27 2007
EXTENSIONS
a(8) from Robert Price, Aug 28 2019
STATUS
approved