|
|
A157975
|
|
Primes p such that 16*p + 15 is also prime.
|
|
4
|
|
|
2, 7, 11, 13, 23, 29, 37, 53, 61, 67, 71, 79, 89, 97, 103, 109, 113, 131, 137, 139, 149, 167, 179, 197, 211, 223, 257, 277, 293, 313, 317, 337, 379, 383, 397, 419, 431, 439, 443, 467, 571, 601, 617, 631, 641, 643, 653, 659, 677, 691, 719, 733, 739, 743, 809
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
Vincenzo Librandi, Table of n, a(n) for n = 1..3000
|
|
MATHEMATICA
|
q=15; lst={}; Do[p=Prime[n]; If[PrimeQ[(q+1)*p+q], AppendTo[lst, p]], {n, 6!}]; lst
Select[Prime[Range[1000]], PrimeQ[16 # + 15]&] (* Vincenzo Librandi, Feb 03 2014 *)
|
|
PROG
|
(MAGMA) [n: n in [0..1000] | IsPrime(n) and IsPrime(16*n + 15)]; // Vincenzo Librandi, Feb 03 2014
|
|
CROSSREFS
|
Cf. A136082, A136083, A023213, A023221, A023235, A023240, A157974, A136083, A136084, A089440, A136085
Sequence in context: A038892 A019346 A045369 * A339862 A045370 A117048
Adjacent sequences: A157972 A157973 A157974 * A157976 A157977 A157978
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
Vladimir Joseph Stephan Orlovsky, Mar 10 2009
|
|
STATUS
|
approved
|
|
|
|