A177104 Primes p such that 2*p^3-1 is also prime.

3, 31, 43, 61, 139, 181, 199, 223, 241, 331, 373, 421, 523, 631, 733, 859, 991, 1033, 1153, 1213, 1423, 1453, 1549, 1741, 1873, 1879, 1951, 2203, 2239, 2269, 2311, 2371, 2539, 2689, 2713, 2719, 2851, 3001, 3019, 3163, 3229, 3271, 3343, 3361, 3391, 3541

Offset

1,1

Links

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

Formula

A000040 INTERSECT A214289. - R. J. Mathar, Aug 20 2019

Mathematica

Select[Prime[Range[500]], PrimeQ[2 #^3 - 1]&] (* Vincenzo Librandi, Apr 17 2013 *)

Prog

(Magma) [p: p in PrimesUpTo(10000)| IsPrime(2*p^3-1)];

Crossrefs

Sequence in context: A198018 A211003 A068331 * A078330 A107210 A256473

Adjacent sequences: A177101 A177102 A177103 * A177105 A177106 A177107

Keyword

nonn,easy

Author

Vincenzo Librandi, Nov 15 2010

Status

approved