|
Search: id:A136683
|
|
| |
|
| 2, 3, 4, 5, 6, 9, 20, 21, 29, 119, 132, 151
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
A136675 = Numerator of Sum (-1)^(k+1)*1/k^3, k = 1..n.
|
|
LINKS
|
Eric Weisstein, The World of Mathematics: Harmonic Number
|
|
MATHEMATICA
|
Do[ f=Numerator[ Sum[ (-1)^(k+1)*1/k^3, {k, 1, n} ] ]; If[ PrimeQ[f], Print[ {n, f} ] ], {n, 1, 151} ]
|
|
CROSSREFS
|
Cf. A058313, A119682, A120296, A136675, A136676, A136677. Cf. A001008, A007406, A007408, A007410, A099828, A103345. Cf. A136681, A136682, A136684, A136685, A136686.
Adjacent sequences: A136680 A136681 A136682 this_sequence A136684 A136685 A136686
Sequence in context: A114044 A113444 A076299 this_sequence A131829 A026266 A075163
|
|
KEYWORD
|
more,nonn
|
|
AUTHOR
|
Alexander Adamchuk (alex(AT)kolmogorov.com), Jan 16 2008
|
|
|
Search completed in 0.002 seconds
|
