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!)
A145480 Primes p such that (p+37)/2 is prime. 13
37, 97, 109, 157, 181, 241, 277, 349, 409, 421, 577, 661, 709, 757, 829, 877, 937, 1009, 1117, 1201, 1249, 1381, 1429, 1609, 1621, 1669, 1777, 1801, 2029, 2089, 2137, 2221, 2269, 2389, 2437, 2521, 2557, 2617, 2857, 3049, 3061, 3121, 3181, 3217, 3301, 3361 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

All these primes are congruent to 1 mod 12

LINKS

Harvey P. Dale, Table of n, a(n) for n = 1..1000

FORMULA

a(n) >> n log^2 n. - Charles R Greathouse IV, Jan 23 2017

MATHEMATICA

aa = {}; k = 37; Do[If[PrimeQ[(k + Prime[n])/2], AppendTo[aa, Prime[n]]], {n, 1, 500}]; aa

Select[Prime[Range[500]], PrimeQ[(37+#)/2]&] (* Harvey P. Dale, Jun 23 2016 *)

PROG

(PARI) list(n)=my(t=1, p, i=1); while(i<n, p=prime(i); i=i+1; if(p>2&&isprime((37+p)/2), print(p, ", "))) \\Anders Hellström, Jan 23 2017

(PARI) list(lim)=my(v=List()); forprime(p=3, lim, if(isprime((p+37)/2), listput(v, p))); Vec(v) \\ Charles R Greathouse IV, Jan 23 2017

CROSSREFS

A092109, A145471-A145480.

Sequence in context: A142525 A132360 A117854 * A033222 A098025 A256602

Adjacent sequences:  A145477 A145478 A145479 * A145481 A145482 A145483

KEYWORD

nonn,easy

AUTHOR

Artur Jasinski, Oct 11 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 | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified August 18 09:56 EDT 2022. Contains 356204 sequences. (Running on oeis4.)