A136074 Father primes of order 5.
43, 131, 197, 263, 461, 593, 659, 1187, 1451, 1847, 1913, 1979, 2111, 2837, 2903, 2969, 4289, 4421, 4751, 5081, 5147, 5279, 5741, 6203, 6269, 6599, 7127, 7193, 7457, 7523, 7919, 8513, 9041, 9239, 9437, 9767, 10427, 10691, 11351, 11549, 11681, 12011
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
n = 5; a = {}; Do[If[PrimeQ[(Prime[k] - 2n)/(2n + 1)], AppendTo[a, Prime[k]]], {k, 1, 1500}]; a
Comments