A087899 Primes associated with A087898.
5, 29, 389, 8969, 331889, 17590169, 1178541389, 93104769809, 14617448860169, 2528818652809409, 483004362686597309, 95151859449259670069, 26357065067444928609389, 7406335283952024939238589, 3414320565901883496988989989, 1635459551067002195057726205209
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..214
Crossrefs
Cf. A087898.
Programs
-
Mathematica
s = {}; ps = {2}; Do[r = Times @@ ps; p = ps[[-1]]; While[p = NextPrime[p]; ! PrimeQ[r*p - 1]]; AppendTo[ps, p]; AppendTo[s, r*p - 1], {15}]; s (* Amiram Eldar, Jan 19 2023 *)
Formula
a(n) = -1 + Product_{k=1..n-1} A087898(k).
a(n) == 9 (mod 10) for n>1. - Sam Alexander, Jan 06 2005
Extensions
a(14) from Sam Alexander, Jan 06 2005
More terms from Amiram Eldar, Jan 19 2023