|
|
A136684
|
|
Numbers k such that A120296(k) is prime.
|
|
8
|
|
|
3, 5, 8, 11, 20, 38, 61, 65, 71, 80, 83, 93, 233, 704, 1649, 2909, 3417, 3634, 9371
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
A120296(k) = Numerator of Sum_{j=1..k} (-1)^(j+1)/j^4.
|
|
LINKS
|
|
|
MATHEMATICA
|
Do[ f=Numerator[ Sum[ (-1)^(k+1)*1/k^4, {k, 1, n} ] ]; If[ PrimeQ[f], Print[ {n, f} ] ], {n, 1, 100} ]
Select[Range[1000], PrimeQ[Numerator[Sum[(-1)^(k+1) 1/k^4, {k, #}]]]&] (* Harvey P. Dale, Aug 28 2012 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|