|
| |
|
|
A119964
|
|
Numerator of the n-th Artin product.
|
|
0
| |
|
|
1, 5, 19, 779, 84911, 2632241, 713337311, 1163866139, 587752400195, 476667196558145, 2856927907113011, 345688276760674331, 13819099649042566549, 4988694973304366524189, 10780569837310736058772429
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| Artin's constant (A005596) is equal to Product[1-1/(Prime[k]*(Prime[k]-1)),{k,1,Infinity}]. n-th Artin product is Product[1-1/(Prime[k]*(Prime[k]-1)),{k,1,n}].
|
|
|
LINKS
| Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics. Artin's Constant.
|
|
|
FORMULA
| a(n) = Numerator[ Product[ 1 - 1/(Prime[k]*(Prime[k]-1)), {k,1,n}]].
|
|
|
MATHEMATICA
| Table[Numerator[Product[1-1/(Prime[k]*(Prime[k]-1)), {k, 1, n}]], {n, 1, 20}]
|
|
|
CROSSREFS
| Cf. A119534, A091568, A091567, A005596, A048296.
Sequence in context: A144745 A072526 A095218 * A174490 A013531 A122152
Adjacent sequences: A119961 A119962 A119963 * A119965 A119966 A119967
|
|
|
KEYWORD
| frac,nonn
|
|
|
AUTHOR
| Alexander Adamchuk (alex(AT)kolmogorov.com), Aug 03 2006
|
| |
|
|