|
| |
|
|
A119723
|
|
Numerator of Sum[ (-1)^(k-1) * 1/(Prime[k]-1)^2, {k,1,n}].
|
|
0
| |
|
|
1, 3, 13, 113, 2861, 709, 45601, 408809, 49595489, 2426258561, 485934733, 485460413, 2429223061, 2427480661, 1284905668069, 217047437215261, 182605590283392901, 36508279615059377, 36518889897389297
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
LINKS
| Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics. Prime Sums.
|
|
|
FORMULA
| a(n) = numerator[ Sum[ (-1)^(k-1) * 1/(Prime[k]-1)^2, {k,1,n}]].
|
|
|
MATHEMATICA
| Numerator[Table[Sum[(-1)^(i-1)*1/(Prime[i]-1)^2, {i, 1, n}], {n, 1, 30}]]
|
|
|
CROSSREFS
| Cf. A119686, A006093, A000040, A086242.
Sequence in context: A062447 A053583 A077713 * A093011 A057865 A121921
Adjacent sequences: A119720 A119721 A119722 * A119724 A119725 A119726
|
|
|
KEYWORD
| frac,nonn
|
|
|
AUTHOR
| Alexander Adamchuk (alex(AT)kolmogorov.com), Jun 13 2006
|
| |
|
|
