|
Search: id:A120273
|
|
|
| A120273 |
|
Absolute value of the numerator of Sum[ (-1)^i * i/Prime[i], {i,1,n}]. |
|
+0
1
|
|
| 1, 1, 13, 29, 731, 4357, 136141, 1497401, 52856987, 698076077, 49526267143, 574253997269, 72925181864501, 1123720869207397, 143426539122302791, 2236629947933814637, 422054527184135696827, 8864360144543549996813
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
FORMULA
|
a(n) = Abs[ numerator[ Sum[ (-1)^i*i/Prime[i], {i,1,n}]]].
|
|
MATHEMATICA
|
Abs[Numerator[Table[Sum[(-1)^i*i/Prime[i], {i, 1, n}], {n, 1, 20}]]]
|
|
CROSSREFS
|
Sequence in context: A139838 A141196 A123571 this_sequence A104817 A048450 A139577
Adjacent sequences: A120270 A120271 A120272 this_sequence A120274 A120275 A120276
|
|
KEYWORD
|
frac,nonn
|
|
AUTHOR
|
Alexander Adamchuk (alex(AT)kolmogorov.com), Jul 01 2006
|
|
|
Search completed in 0.002 seconds
|
