OFFSET
1,1
COMMENTS
Prime numbers of the form A051451(k)-1.
Primes p = LCM(1,...,m) - 1, where m is a prime power. (The prime powers give all values, and do so uniquely.) - Daniel Forgues, Apr 28 2014
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..23
EXAMPLE
232792559 + 1 = LCM(1,...,m) for m = 19, 20, 21, 22.
MATHEMATICA
Select[FoldList[LCM, Select[Range[100], PrimePowerQ]] - 1, PrimeQ] (* Amiram Eldar, Aug 18 2024 *)
PROG
(PARI) L=1; for(n=2, 1e3, if(isprimepower(n, &p) && ispseudoprime((L*=p)-1), print1(L-1", "))) \\ Charles R Greathouse IV, Apr 28 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Nov 08 2000
STATUS
approved