|
%I #11 Jul 14 2020 16:05:52
%S 11,17,23,29,37,41,47,53,59,67,71,79,83,89,97,101,107,113,127,131,137,
%T 157,163,167,173,179,197,211,223,227,233,239,257,263,269,277,281,307,
%U 311,317,331,337,353,359,367,373,379,383,389,397,401,409,439,443,449
%N Primes separated from their previous adjacent primes by a prime number of successive composites.
%H Harvey P. Dale, <a href="/A209624/b209624.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = A151800(A209617).
%e a(1)=11 is the first prime separated from the previous prime (7) by a prime number (3) of successive composites, namely, 10, 9, 8.
%t Select[Prime[Range[2, 100]], PrimeQ[# - NextPrime[#, -1] - 1] &] (* _T. D. Noe_, Mar 12 2012 *)
%t Select[Partition[Prime[Range[100]],2,1],PrimeQ[#[[2]]-#[[1]]-1]&][[All,2]] (* _Harvey P. Dale_, Jul 14 2020 *)
%Y Cf. A209617.
%K nonn
%O 1,1
%A _Lekraj Beedassy_, Mar 10 2012
|
