A308413 Numbers k such that 23^(k+19) + 19^(k+17) + 17^(k+13) + 13^(k+11) + 11^(k+7) + 7^(k+5) + 5^(k+3) + 3^(k+2) - 1 is prime.
6, 60, 66, 414, 29340
Offset: 1
Crossrefs
Cf. A306573.
Programs
-
Mathematica
ParallelTable[If[PrimeQ[23^(n+19) + 19^(n+17) + 17^(n+13) + 13^(n+11) + 11^(n+7) + 7^(n+5) + 5^(n+3) + 3^(n+2) - 1], n, Nothing], {n, 30000}]
Comments