OFFSET
0,2
COMMENTS
This sequence came up in the course of a currently ongoing investigation into Singmaster's conjecture by a group including the author of this sequence.
EXAMPLE
a(4) is the product of the first four primes greater than or equal to 4: 5*7*11*13 = 5005.
MAPLE
a:= n-> mul((nextprime@@i)(n-1), i=1..n):
seq(a(n), n=0..17); # Alois P. Heinz, Jun 24 2024
MATHEMATICA
a[n_]:=Product[Prime[i], {i, 1+PrimePi[n-1], n+PrimePi[n-1]}]; Array[a, 18, 0] (* Stefano Spezia, Jun 25 2024 *)
PROG
(PARI) a(n) = if (n==0, 1, my(p=nextprime(n)); vecprod(primes([p, prime(primepi(p)+n-1)]))); \\ Michel Marcus, Jun 25 2024
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Jesse Hammer, Jun 24 2024
STATUS
approved