OFFSET
1,1
COMMENTS
The next term has k > 10^4, if it exists. - Amiram Eldar, Aug 23 2024
FORMULA
MATHEMATICA
Select[FoldList[LCM, 1, Select[Range[100], PrimePowerQ]]^2 + 1, PrimeQ] (* Amiram Eldar, Aug 23 2024 *)
CROSSREFS
KEYWORD
nonn,hard
AUTHOR
Labos Elemer, Feb 09 2000
STATUS
approved