OFFSET
1,1
COMMENTS
p(i)^2 is the least composite whose GCD is 1 for all previous composites.
MATHEMATICA
Needs["NumberTheory`NumberTheoryFunctions`"]; Table[p = Table[Prime[i], {i, 1, n}]; ChineseRemainder[p, p^2], {n, 1, 15}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, May 25 2002
STATUS
approved