The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A262176 Numbers n where n-17, n-1, n+1 and n+17 are consecutive primes. 1
 3390, 66570, 70140, 84810, 132330, 136710, 222840, 225750, 242730, 271770, 288930, 320010, 330330, 377370, 390390, 414330, 463890, 489960, 505710, 644670, 758340, 819390, 830310, 857010, 895650, 906540, 908910, 924810, 952380, 968520, 974820 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS This is a subsequence of A014574 (average of twin prime pairs), A256753 and A249674 (30n). LINKS Karl V. Keller, Jr., Table of n, a(n) for n = 1..10000 Eric Weisstein's World of Mathematics, Twin Primes EXAMPLE 3390 is the average of the four consecutive primes 3373, 3389, 3391, 3407. 66570 is the average of the four consecutive primes 66553, 66569, 66571, 66587. MATHEMATICA Select[Prime@ Range@ 50000, NextPrime[#, {1, 2, 3}] == {16, 18, 34} + # &] + 17 (* Giovanni Resta, Sep 14 2015 *) PROG (Python) from sympy import isprime, prevprime, nextprime for i in range(0, 3000001, 6): ..if isprime(i-1) and isprime(i+1) and prevprime(i-1)==i-17 and nextprime(i+1)==i+17 : print (i, end=', ') (PARI) list(l)=for(i=1, l, p=prime(i); if(p+16==prime(i+1)&&p+18==prime(i+2)&&p+34==prime(i+3), print1(p+17, ", "))) \\ Anders Hellström, Sep 14 2015 (Perl) use ntheory ":all"; say \$_+1 for grep { next_prime(\$_+2)-\$_ == 18 && \$_-prev_prime(\$_) == 16} @{twin_primes(1e9)}; # Dana Jacobsen, Oct 13 2015 (Perl) use ntheory ":all"; say \$_+17 for grep { next_prime(\$_+0)-\$_ == 16 && next_prime(\$_+18)-\$_ == 34} sieve_prime_cluster(1, 1e9, 16, 18, 34); # Dana Jacobsen, Oct 13 2015 CROSSREFS Cf. A014574, A077800 (twin primes), A249674, A256753. Sequence in context: A031611 A133966 A043671 * A172788 A185573 A185926 Adjacent sequences:  A262173 A262174 A262175 * A262177 A262178 A262179 KEYWORD nonn AUTHOR Karl V. Keller, Jr., Sep 13 2015 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified April 19 07:26 EDT 2021. Contains 343109 sequences. (Running on oeis4.)