[go: up one dir, main page]

login
A053608
Numbers x = LCM(1,2,...,k) such that x^2 + 1 is prime.
1
1, 2, 6, 420, 360360, 718766754945489455304472257065075294400
OFFSET
1,2
COMMENTS
The next term has k > 10^4, if it exists. - Amiram Eldar, Aug 23 2024
MATHEMATICA
Select[FoldList[LCM, 1, Select[Range[100], PrimePowerQ]], PrimeQ[#^2 + 1] &] (* Amiram Eldar, Aug 23 2024 *)
KEYWORD
nonn,hard
AUTHOR
Labos Elemer, Feb 09 2000
STATUS
approved