This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A064687 Numbers k such that 100k+1, 100k+3, 100k+7, 100k+9 are all primes. 9
 1, 130, 253, 1222, 1657, 2437, 2476, 3589, 5188, 5395, 6073, 9763, 10063, 10225, 10687, 11176, 11677, 13297, 13399, 13522, 13588, 14008, 14470, 14614, 16168, 16276, 16531, 16591, 20164, 20620, 21418, 21445, 21775, 23734, 25351, 27049 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS Harry J. Smith, Table of n, a(n) for n = 1..1000 MATHEMATICA Select[Range[30000], PrimeQ[100# + 1] && PrimeQ[100# + 3] && PrimeQ[100# + 7] && PrimeQ[100# + 9] &] Select[Range[30000], AllTrue[100#+{1, 3, 7, 9}, PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Sep 28 2015 *) PROG (PARI) for(n=1, 100000, if(isprime(100*n+1) && isprime(100*n+3) && isprime(100*n+7) && isprime(100*n+9), print1(n, ", "))) (PARI) { n=0; for (m=1, 10^9, if(isprime(100*m + 1) && isprime(100*m + 3) && isprime(100*m + 7) && isprime(100*m + 9), write("b064687.txt", n++, " ", m); if (n==1000, break)) ) } \\ Harry J. Smith, Sep 22 2009 CROSSREFS Sequence in context: A138482 A138481 A167702 * A238194 A252263 A252361 Adjacent sequences:  A064684 A064685 A064686 * A064688 A064689 A064690 KEYWORD nonn AUTHOR Jason Earls, Oct 10 2001 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 October 21 04:40 EDT 2019. Contains 328291 sequences. (Running on oeis4.)