|
|
A136369
|
|
Numbers k such that A136368(k) is prime.
|
|
6
|
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
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).
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|