|
| |
|
|
A119686
|
|
Numerator of Sum[ 1/(Prime[k]-1)^2, {k,1, n}].
|
|
6
| |
|
|
1, 5, 21, 193, 4861, 2443, 78401, 707209, 85701889, 4203312961, 841345613, 841819933, 4211020661, 4212763061, 2229320057669, 376856710434461, 317005189060740101, 317069381268836117, 317122432680485717
(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/(Prime[k]-1)^2, {k,1, n}]].
|
|
|
MATHEMATICA
| Numerator[Table[Sum[1/(Prime[i]-1)^2, {i, 1, n}], {n, 1, 30}]]
|
|
|
CROSSREFS
| Cf. A006093, A000040, A086242.
Sequence in context: A140196 A027160 A195963 * A141798 A015461 A101694
Adjacent sequences: A119683 A119684 A119685 * A119687 A119688 A119689
|
|
|
KEYWORD
| frac,nonn
|
|
|
AUTHOR
| Alexander Adamchuk (alex(AT)kolmogorov.com), Jun 08 2006
|
| |
|
|
