OFFSET
2,1
COMMENTS
LINKS
EXAMPLE
a(2) = (2 * 3)/prime(2 - 1) = 6/2 = 3.
a(3) = (2*3*5)/prime(3 - 1) = 30/3 = 10.
MAPLE
a:= proc(n) option remember; `if`(n=2, 3,
a(n-1)*(p-> p(n-2)/p(n-1)*p(n))(ithprime))
end:
seq(a(n), n=2..23); # Alois P. Heinz, Jan 10 2021
MATHEMATICA
Array[Product[Prime@ i, {i, #}]/Prime[# - 1] &, 20, 2]
PROG
(PARI) a(n) = prod(k=1, n, prime(k))/prime(n-1); \\ Michel Marcus, Apr 13 2019
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Michael De Vlieger, Apr 10 2019
STATUS
approved