The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A155153 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing all changes.

A155153

Primes p such that 13*p^2+3*p+1 is a prime.
(history; published version)

#10 by Charles R Greathouse IV at Thu Sep 08 08:45:40 EDT 2022

PROG

(MAGMAMagma) [p: p in PrimesUpTo(1500) | IsPrime(13*p^2+3*p+1)]; // Vincenzo Librandi, Oct 14 2012

Discussion

Thu Sep 08

08:45

OEIS Server: https://oeis.org/edit/global/2944

#9 by Bruno Berselli at Mon Oct 15 03:32:09 EDT 2012

STATUS

editing

approved

#8 by Bruno Berselli at Mon Oct 15 03:31:56 EDT 2012

CROSSREFS

Cf. Subsequence of A155152.

#7 by Bruno Berselli at Mon Oct 15 03:31:11 EDT 2012

NAME

Numbers Primes p (prime) such that 13*p^2+3*p+1 is a prime.

MATHEMATICA

Select[Prime[Range[1000]], PrimeQ[(13 #^2 + 3 # + 1)] &] (* Vincenzo Librandi, Oct 14 2012 *)

PROG

(MAGMA) [p: p in PrimesUpTo(1500) | IsPrime(13*p^2 + 3*p + 1)]; // Vincenzo Librandi, Oct 14 2012

STATUS

proposed

editing

#6 by Vincenzo Librandi at Sun Oct 14 12:58:05 EDT 2012

STATUS

editing

proposed

#5 by Vincenzo Librandi at Sun Oct 14 12:57:54 EDT 2012

NAME

Numbers p (prime) such that 13*p^2+3*p+1 is a prime.

LINKS

Vincenzo Librandi, <a href="/A155153/b155153.txt">Table of n, a(n) for n = 1..1000</a>

MATHEMATICA

Select[Prime[Range[1000]], PrimeQ[(13#^2 + 3# + 1)] &] (* Vincenzo Librandi, Oct 14 2012 *)

PROG

(MAGMA) [p: p in PrimesUpTo(1500)|IsPrime(13*p^2 + 3*p + 1)]; // Vincenzo Librandi, Oct 14 2012

CROSSREFS

Cf. A155152.

KEYWORD

nonn,easy

STATUS

approved

editing

#4 by Russ Cox at Fri Mar 30 18:38:06 EDT 2012

AUTHOR

_Vincenzo Librandi (vincenzo.librandi(AT)tin.it), _, Jan 21 2009

Discussion

Fri Mar 30

18:38

OEIS Server: https://oeis.org/edit/global/215

#3 by N. J. A. Sloane at Sun Jul 11 03:00:00 EDT 2010

PROG

(MAGMA) [p: p in PrimesUpTo(10000) | IsPrime(13*p^2+3*p+1)] [From Vincenzo Librandi (vincenzo.librandi(AT)tin.it), Mar 16 2010]

KEYWORD

nonn,new

nonn

EXTENSIONS

More terms from Vincenzo Librandi (vincenzo.librandi(AT)tin.it), Mar 16 2010

#2 by N. J. A. Sloane at Tue Jun 01 03:00:00 EDT 2010

DATA

2, 3, 7, 11, 13, 19, 23, 37, 41, 47, 53, 73, 79, 97, 107, 131, 163, 167, 211, 223, 227, 229, 317, 337, 347, 353, 389, 397, 419, 491, 499, 547, 569, 601, 677, 683, 727, 757, 829, 839, 941, 1051, 1117, 1151, 1163, 1181, 1201, 1217, 1367, 1399, 1409, 1427, 1433, 1453

PROG

(MAGMA) [p: p in PrimesUpTo(10000) | IsPrime(13*p^2+3*p+1)] [From Vincenzo Librandi (vincenzo.librandi(AT)tin.it), Mar 16 2010]

KEYWORD

nonn,new

nonn

EXTENSIONS

More terms from Vincenzo Librandi (vincenzo.librandi(AT)tin.it), Mar 16 2010

#1 by N. J. A. Sloane at Fri Feb 27 03:00:00 EST 2009

NAME

Numbers p (prime) such that 13*p^2+3*p+1 is a prime

DATA

2, 3, 7, 11, 13, 19, 23, 37, 41, 47, 53, 73, 79, 97, 107, 131, 163, 167, 211, 223, 227, 229

OFFSET

1,1

EXAMPLE

For p=3, 13*p^2+3*p+1=127; p=73, 13*p^2+3*p+1=69497

CROSSREFS

Cf. A155152

KEYWORD

nonn

AUTHOR

Vincenzo Librandi (vincenzo.librandi(AT)tin.it), Jan 21 2009

STATUS

approved