|
Search: id:A120272
|
|
|
| A120272 |
|
Numerator of Sum[ k/Prime[k], {k,1,n}]. |
|
+0 1
|
|
| 1, 7, 53, 491, 6451, 97723, 1871501, 39642599, 999076987, 31204161323, 1038495626543, 40831064063651, 1770543222362221, 80392862250956443, 3974705945770003271, 220497651647226035923, 13563377141298566879867
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
FORMULA
|
a(n) = numerator[ Sum[ k/Prime[k], {k,1,n}]].
|
|
MATHEMATICA
|
Numerator[Table[Sum[i/Prime[i], {i, 1, n}], {n, 1, 20}]]
|
|
CROSSREFS
|
Sequence in context: A015561 A133588 A081338 this_sequence A057180 A137612 A092802
Adjacent sequences: A120269 A120270 A120271 this_sequence A120273 A120274 A120275
|
|
KEYWORD
|
frac,nonn
|
|
AUTHOR
|
Alexander Adamchuk (alex(AT)kolmogorov.com), Jul 01 2006
|
|
|
Search completed in 0.002 seconds
|