A145478 -id:A145478 - cp's OEIS frontend

A145479 Primes p such that (31+p)/2 is prime.

3, 7, 31, 43, 103, 127, 163, 223, 271, 283, 331, 367, 523, 631, 643, 727, 787, 811, 883, 967, 1051, 1063, 1123, 1171, 1231, 1291, 1423, 1447, 1471, 1483, 1543, 1627, 1723, 1783, 1951, 1987, 2011, 2143, 2203, 2311, 2371, 2467, 2551, 2731, 2767, 2887, 3067

Offset: 1

Artur Jasinski, Oct 11 2008

nonn

All terms are congruent to 3 mod 4 and (with the exception of the first term) to 7 mod 12.

Ivan Neretin, Table of n, a(n) for n = 1..10000

Cf. A092109, A145471, A145472, A145473, A145474, A145475, A145476, A145477, A145478, A145479, A155480.

aa = {}; k = 31; Do[If[PrimeQ[(k + Prime[n])/2], AppendTo[aa, Prime[n]]], {n, 1, 500}];aa
Select[Prime[Range[500]],PrimeQ[(31+#)/2]&] (* Harvey P. Dale, Feb 05 2012 *)

list(n)=my(t=1, p, i=1); while(i2&&isprime((31+p)/2),print1(p, ", "))) \\ Anders Hellström, Jan 23 2017

A145484 Primes p such that 2*p - 29 is a positive prime.

Original entry on oeis.org

17, 23, 29, 41, 59, 71, 83, 89, 101, 113, 131, 149, 173, 191, 239, 269, 293, 311, 353, 401, 419, 443, 479, 491, 503, 521, 563, 569, 653, 659, 701, 719, 761, 821, 863, 881, 953, 971, 1013, 1049, 1091, 1151, 1163, 1181, 1193, 1223, 1289, 1319, 1361, 1409

Offset: 1

Artur Jasinski, Oct 11 2008

nonn

Ivan Neretin, Table of n, a(n) for n = 1..10000

Cf. A063908-A063913, A092109, A145471-A145490.

aa = {}; k = 29; Do[If[PrimeQ[(k + Prime[n])/2], AppendTo[aa, (k + Prime[n])/2]], {n, 1, 500}];aa (* Artur Jasinski *)
Select[Prime[Range[7,300]],PrimeQ[2#-29]&] (* Harvey P. Dale, Dec 14 2010 *)

a(n) = 2*A145478(n) - 29.

cp's OEIS Frontend

A145479 Primes p such that (31+p)/2 is prime.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Mathematica

PARI