A128001 Numbers n such that (n-1)*2^n+1 is prime.

2, 3, 7, 27, 51, 55, 81, 1471, 1483, 8668, 10885, 20803, 32605, 36391, 57004, 61627, 88651, 89731

Offset

1,1

Links

Table of n, a(n) for n=1..18.

Mathematica

Select[Range[200], PrimeQ[(# - 1)*2^# + 1] &]  (* G. C. Greubel, May 08 2018 *)

Prog

(PARI) is(n)=ispseudoprime((n-1)<<n+1) \\ Charles R Greathouse IV, Jun 06 2017

Crossrefs

Cf. A029544, A002064.

Sequence in context: A089708 A107881 A371161 * A264829 A156142 A052877

Adjacent sequences: A127998 A127999 A128000 * A128002 A128003 A128004

Keyword

nonn,more

Author

N. J. A. Sloane, Jan 25 2008

Extensions

a(8)-a(14) from Jason Earls, Jan 29 2008

a(15)-a(18) from Charles R Greathouse IV, Oct 09 2011

Status

approved