A165946 Primes of the form p + (p-1)^3, where p is also prime.

3, 11, 223, 1741, 5851, 27031, 74131, 216061, 1061311, 1259821, 2000503, 4251691, 5832181, 13824241, 21024853, 30371641, 37933393, 49028263, 54010531, 67917721, 84028111, 123506491, 162771883, 185193571, 191103553, 216000601, 229221541, 250047631, 264609931

Offset

1,1

Comments

Generated by p = 2, 3, 7, 13, 19, 31, 43, 61, 103, 109, 127,... [R. J. Mathar, Oct 28 2009]

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Mathematica

Select[Table[Prime[i] + (Prime[i] - 1)^3, {i, 300}], PrimeQ] (* Harvey P. Dale, Oct 07 2009 *)
Select[Table[p + (p - 1)^3, {p, Prime[Range[300]]}], PrimeQ] (* Vincenzo Librandi, Oct 12 2012 *)

Prog

(Magma) [a: p in PrimesInInterval(1, 1000) | IsPrime(a) where a is p + (p - 1)^3]; // Vincenzo Librandi, Oct 12 2012

Crossrefs

Cf. A095692, A163421. [R. J. Mathar, Oct 28 2009]

Sequence in context: A289170 A060346 A145988 * A253639 A112357 A205771

Adjacent sequences: A165943 A165944 A165945 * A165947 A165948 A165949

Keyword

nonn,easy

Author

Claudio Meller, Oct 01 2009

Extensions

5 more terms from R. J. Mathar, Oct 28 2009

Status

approved