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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A155010 Primes p such that (p-a)*(p+a)-+a*p and (p-b)*(p+b)-+b*p are primes, a=2,b=3. 0
7, 37, 587, 28703, 35677, 36857, 99367, 326707, 361687, 578167, 613573, 619007, 656407, 688783, 702203, 713467, 874823, 922027, 940573, 1045763, 1057907, 1244687, 1371157, 1419697, 1555187, 1665767, 1687187, 1687327, 1799453 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Table of n, a(n) for n=1..29.

MATHEMATICA

lst={}; Do[p=Prime[n]; If[PrimeQ[(p-2)*(p+2)-2*p]&&PrimeQ[(p-2)*(p+2)+2*p]&&PrimeQ[(p-3)*(p+3)-3*p]&&PrimeQ[(p-3)*(p+3)+3*p], AppendTo[lst, p]], {n, 9!}]; lst

Select[Prime[Range[200000]], AllTrue[Flatten[{(#-2)(#+2)+{2#, -2#}, (#-3)(#+3)+ {3#, -3#}}], PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Apr 26 2015 *)

CROSSREFS

Cf. A125272, A053184, A038872, A141158, A038615, A098058, A038936, A089270, A140559, A154939, A155006, A155007, A155008, A155009

Sequence in context: A341377 A082687 A117731 * A292807 A210620 A250843

Adjacent sequences:  A155007 A155008 A155009 * A155011 A155012 A155013

KEYWORD

nonn

AUTHOR

Vladimir Joseph Stephan Orlovsky, Jan 18 2009

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 April 18 14:58 EDT 2021. Contains 343089 sequences. (Running on oeis4.)