A209624 Primes separated from their previous adjacent primes by a prime number of successive composites.
11, 17, 23, 29, 37, 41, 47, 53, 59, 67, 71, 79, 83, 89, 97, 101, 107, 113, 127, 131, 137, 157, 163, 167, 173, 179, 197, 211, 223, 227, 233, 239, 257, 263, 269, 277, 281, 307, 311, 317, 331, 337, 353, 359, 367, 373, 379, 383, 389, 397, 401, 409, 439, 443, 449
Offset: 1
Keywords
Examples
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.
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A209617.
Programs
-
Mathematica
Select[Prime[Range[2, 100]], PrimeQ[# - NextPrime[#, -1] - 1] &] (* T. D. Noe, Mar 12 2012 *) Select[Partition[Prime[Range[100]],2,1],PrimeQ[#[[2]]-#[[1]]-1]&][[All,2]] (* Harvey P. Dale, Jul 14 2020 *)