%I #5 Mar 16 2020 09:59:35
%S 23,67,199,331,397,463,661,727,859,1123,1783,2113,2179,2311,2971,3037,
%T 3433,3631,3697,4027,4093,4159,4357,4621,5347,5479,5743,6007,6271,
%U 6337,6733,7393,7591,7789,8053,8317,8647,9043,9109,9439,9967,10099,10627
%N Mother primes of order 5.
%C For smallest mother primes of order n see A136020 (also definition). For mother primes of order 1 see A091180. For mother primes of order 2 see A136061. For mother primes of order 3 see A136062. For mother primes of order 4 see A136063.
%H Amiram Eldar, <a href="/A136064/b136064.txt">Table of n, a(n) for n = 1..10000</a>
%t n = 5; a = {}; Do[If[PrimeQ[(Prime[k] + 2n)/(2n + 1)], AppendTo[a, Prime[k]]], {k, 1, 1500}]; a
%Y Cf. A088878, A091180, A136019, A136020, A136061, A136062, A136063, A136065, A136066, A136067, A136068, A136069, A136070.
%K nonn
%O 1,1
%A _Artur Jasinski_, Dec 12 2007