A136078 Father primes of order 9.
113, 151, 227, 379, 569, 607, 797, 911, 1291, 1367, 1709, 1861, 2089, 2621, 2659, 2887, 3001, 3191, 3457, 3761, 4027, 4597, 4787, 5167, 5281, 5851, 5927, 6421, 6991, 7219, 7561, 7789, 8017, 9689, 10601, 10867, 11171, 11399, 11437, 11551, 11779
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
n = 9; a = {}; Do[If[PrimeQ[(Prime[k] - 2n)/(2n + 1)], AppendTo[a, Prime[k]]], {k, 1, 1500}]; a Select[Prime[Range[1500]],PrimeQ[(#-18)/19]&] (* Harvey P. Dale, Mar 26 2023 *)
Comments