OFFSET
0,2
COMMENTS
For n > 1, a(n) belongs to A083207 (see "product" formula below and my Jan 16 2020 comment in A083207). - Ivan N. Ianakiev, Mar 17 2020
EXAMPLE
a(7) = a(6) * prime(gpf(a(6))) = prime(1) * prime(2) * prime(3) * prime(5) * prime(11) * prime(31) * prime(127) = 2 * 3 * 5 * 11 * 31 * 127 * 709 = 921139890.
MATHEMATICA
a[0] = 1; a[n_] := a[n] = a[n - 1] Prime[FactorInteger[a[n - 1]][[-1, 1]]]; Table[a[n], {n, 0, 13}]
Table[Times @@ NestList[Prime@# &, 1, n], {n, 0, 13}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Mar 17 2020
STATUS
approved