login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A106022 Primes p such that 2*p +/- 3 and 8*p +/- 3 are all primes. 1

%I #15 Sep 08 2022 08:45:17

%S 5,7,13,127,2477,2857,3163,3793,9127,11173,11437,12347,22567,23227,

%T 27847,28573,28867,30703,36793,49937,50147,57373,67523,71483,81353,

%U 82657,83077,85303,92413,108557,110083,123997,126223,132383,141917

%N Primes p such that 2*p +/- 3 and 8*p +/- 3 are all primes.

%H Harvey P. Dale, <a href="/A106022/b106022.txt">Table of n, a(n) for n = 1..1000</a>

%t Select[Prime[Range[4000]], PrimeQ[8#+3]&&PrimeQ[8#-3]&&PrimeQ[2#+3]&&PrimeQ[2#-3]&]

%t Select[Prime[Range[20000]],AllTrue[Flatten[{2#+{3,-3},8#+{3,-3}}], PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Jun 12 2015 *)

%o (Magma) [p: p in PrimesUpTo(1000000)| IsPrime(2*p+3) and IsPrime(2*p-3)and IsPrime(8*p-3) and IsPrime(8*p+3)] // _Vincenzo Librandi_, Nov 13 2010

%K nonn

%O 1,1

%A _Zak Seidov_, May 05 2005

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified February 26 02:39 EST 2024. Contains 370335 sequences. (Running on oeis4.)