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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A051779 Primes of form pq + 2 where p and q are twin primes. 9
17, 37, 22501, 32401, 57601, 72901, 176401, 324901, 1664101, 1742401, 5336101, 6502501, 7452901, 11289601, 11492101, 18147601, 21622501, 34222501, 34574401, 40449601, 45968401, 81000001, 85377601, 92736901, 110880901, 118592101 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Starting with 3rd term, 22501, all terms are of the form 900n^2+1 with n=5, 6, 8, 9, 14, 19, 43, 44, 77, 85 (A125251). - Zak Seidov, Dec 07 2008

Primes of the form (p^2 + q^2)/2, where p and q are twin primes. - Thomas Ordowski and Altug Alkan, Mar 19 2017

LINKS

Giovanni Resta, Table of n, a(n) for n = 1..10000

FORMULA

{A037074(k) + 2} INTERSECT {A000040}. {A001359(k) * A006512(k) + 2} INTERSECT {A000040}. {A054735(k)^2 + 2*A054735(k) + 2} INTERSECT {A000040}. - Jonathan Vos Post, May 11 2006

EXAMPLE

The third term 22501 is a member of the sequence because 22501=149*151+2, 22501 is prime and {149,151} is a twin prime pair.

MAPLE

with (numtheory): for n from 1 to 2000 do if (ithprime(n+1)-ithprime(n)=2) then if (tau(ithprime(n)*ithprime(n+1)+2)=2) then print(ithprime(n), ithprime(n+1), ithprime(n)*ithprime(n+1)+2); fi; fi; od;

MATHEMATICA

lst={}; Do[p=Prime[n]; If[Length[Divisors[p-2]]==4&&(Divisors[p-2][[3]]-Divisors[p-2][[2]])==2, AppendTo[lst, p]], {n, 6*10^5}]; lst (* Vladimir Joseph Stephan Orlovsky, Aug 08 2008 *)

Select[(First[#]Last[#]+2)&/@Select[Partition[Prime[Range[2700]], 2, 1], Last[#]-First[#]==2&], PrimeQ]  (* Harvey P. Dale, Mar 11 2011 *)

Select[2 + Times @@@ Select[ Partition[ Prime@ Range@ 1350, 2, 1], First[#] + 2 == Last[#] &], PrimeQ] (* Robert G. Wilson v, Mar 12 2001 *)

CROSSREFS

Cf. A048880, A051779, A000040, A001359, A005384, A006512, A037074, A054735.

Cf. A125251. - Zak Seidov, Dec 07 2008

Sequence in context: A153685 A208292 A121710 * A139579 A293206 A125248

Adjacent sequences:  A051776 A051777 A051778 * A051780 A051781 A051782

KEYWORD

easy,nonn

AUTHOR

Joe DeMaio (jdemaio(AT)kennesaw.edu), Dec 09 1999

EXTENSIONS

Edited by R. J. Mathar, Aug 08 2008

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 March 18 19:58 EDT 2019. Contains 321293 sequences. (Running on oeis4.)