|
Search: id:A064647
|
|
|
| A064647 |
|
Denominators of partial sums of reciprocals of primorial numbers. |
|
+0
1
|
|
| 2, 3, 10, 105, 770, 15015, 170170, 4849845, 6760390, 3234846615, 200560490130, 72752334655, 4680773285034, 284407855036305, 614889782588491410, 465559406817000639, 44715356980330526490, 19548063559901161830545
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
n=5, Sum[1/q(j)],j=1..5 = 1/2+1/6+1/30+1/210+1/2310= (1155+385+77+11+1)/2310=1629/2310=543/770, a(5)=770
|
|
MATHEMATICA
|
q[x_] := Apply[Times, Table[Prime[j], {j, 1, x}]] a(n)=Denominator[Apply[Plus, Table[1/q[w], {w, 1, n}]]]
|
|
CROSSREFS
|
A002110.
Sequence in context: A088222 A155148 A076927 this_sequence A062006 A119810 A055708
Adjacent sequences: A064644 A064645 A064646 this_sequence A064648 A064649 A064650
|
|
KEYWORD
|
frac,nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Oct 04 2001
|
|
|
Search completed in 0.002 seconds
|
