|
|
A107712
|
|
a(n) = Product_{k=1..n} prime(k+n).
|
|
4
|
|
|
1, 3, 35, 1001, 46189, 2800733, 247110827, 25626846353, 3359814435017, 525737919635921, 86239147714071593, 16043263382808092801, 3203015854291983284351, 765364544499964883824067, 196164712672886348479652149, 51407675872168960728167564239
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
MAPLE
|
a:=n->product(ithprime(k+n), k=1..n): seq(a(n), n=0..16); # Emeric Deutsch
|
|
MATHEMATICA
|
f[n_] := Product[Prime[k + n], {k, n}]; Table[ f[n], {n, 0, 14}] (* Robert G. Wilson v, Jun 14 2005 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|