Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #8 Mar 26 2023 16:50:59
%S 113,151,227,379,569,607,797,911,1291,1367,1709,1861,2089,2621,2659,
%T 2887,3001,3191,3457,3761,4027,4597,4787,5167,5281,5851,5927,6421,
%U 6991,7219,7561,7789,8017,9689,10601,10867,11171,11399,11437,11551,11779
%N Father primes of order 9.
%C For smallest father primes of order n see A136026 (also definition). For father primes of order 1 see A094524. For father primes of order 2 see A136071. For father primes of order 3 see A136072. For father primes of order 4 see A136073. For father primes of order 5 see A136074. For father primes of order 6 see A136075. For father primes of order 7 see A136076. For father primes of order 8 see A136077.
%H Amiram Eldar, <a href="/A136078/b136078.txt">Table of n, a(n) for n = 1..10000</a>
%t n = 9; a = {}; Do[If[PrimeQ[(Prime[k] - 2n)/(2n + 1)], AppendTo[a, Prime[k]]], {k, 1, 1500}]; a
%t Select[Prime[Range[1500]],PrimeQ[(#-18)/19]&] (* _Harvey P. Dale_, Mar 26 2023 *)
%Y Cf. A023208, A094524, A136019, A136020, A136026, A136027, A136071, A136072, A136073, A136074, A136075, A136076, A136077, A136079, A136080.
%K nonn
%O 1,1
%A _Artur Jasinski_, Dec 12 2007