|
Search: id:A125708
|
|
| |
| |
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
A115963(n) is the numerator of Sum[ 1/Prime[k]^3, {k,1,n} ].
|
|
MATHEMATICA
|
f=0; Do[p=Prime[n]; f=f+1/p^3; g=Numerator[f]; If[PrimeQ[g], Print[{n, p, g}]], {n, 1, 50}]
|
|
CROSSREFS
|
Cf. A115963, A024451, A092062, A061015, A109628.
Sequence in context: A013622 A027715 A082703 this_sequence A055289 A163550 A123220
Adjacent sequences: A125705 A125706 A125707 this_sequence A125709 A125710 A125711
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
Alexander Adamchuk (alex(AT)kolmogorov.com), Feb 01 2007, Mar 01 2007
|
|
|
Search completed in 0.002 seconds
|
