login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A014561 Numbers n giving rise to prime quadruples (30n+11, 30n+13, 30n+17, 30n+19). 16
0, 3, 6, 27, 49, 62, 69, 108, 115, 188, 314, 433, 521, 524, 535, 601, 630, 647, 700, 742, 843, 1057, 1161, 1459, 1711, 1844, 2099, 2240, 2316, 2407, 2575, 2656, 2701, 2757, 2960, 3261, 3304, 3370, 3661, 3884, 3976, 4073, 4515, 4805, 5242, 5523, 5561, 5705 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

Intersection of A089160 and A089161. - Zak Seidov, Dec 22 2006

Solutions of the equation (30*n+11)'+(30*n+13)'+(30*n+17)'+(30*n+19)'=4, where n' is the arithmetic derivative of n. [Paolo P. Lava, Nov 15 2012]

This can be seen as a condensed version of A007530, which lists the first member of the actual prime quadruplet (30x+11, 30x+13, 30x+17, 30x+19), x=a(n). - M. F. Hasler, Dec 05 2013

LINKS

Zak Seidov and Michael De Vlieger, Table of n, a(n) for n = 1..10972 (first 1000 terms from Zak Seidov)

Eric Weisstein's World of Mathematics, Prime Quadruplet.

FORMULA

a(n) = (A007811(n)-1)/3. [Zak Seidov, Sep 21 2009]

a(n) = (A007530(n+1)-11)/30 = floor(A007530(n+1)/30). - M. F. Hasler, Dec 05 2013

MATHEMATICA

a014561Q[n_Integer] :=

  If[And[PrimeQ[30 n + 11], PrimeQ[30 n + 13], PrimeQ[30 n + 17],

     PrimeQ[30 n + 19]] == True, True, False];

a014561[n_Integer] :=

  Flatten[Position[Thread[a014561Q[Range[n]]], True]];

a014561[1000] (* Michael De Vlieger, Jul 17 2014 *)

Select[Range[0, 6000], AllTrue[30#+{11, 13, 17, 19}, PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Oct 21 2016 *)

PROG

(PARI) isok(n) = isprime(30*n+11) && isprime(30*n+13) && isprime(30*n+17) && isprime(30*n+19) \\ Michel Marcus, Jun 09 2013

CROSSREFS

Cf. A089160, A089161.

Cf. A007530, A007811.

Sequence in context: A256762 A064283 A266857 * A034502 A217725 A023169

Adjacent sequences:  A014558 A014559 A014560 * A014562 A014563 A014564

KEYWORD

nonn

AUTHOR

Eric W. Weisstein

EXTENSIONS

More terms from Warut Roonguthai

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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 20 10:45 EDT 2019. Contains 328257 sequences. (Running on oeis4.)