OFFSET
1,1
COMMENTS
Generated by n = 1, 2, 3, 6, 7, 14, 27, 66, 67, 87, 115, .. = A029544(n)+1.
See also A236752 for primes of the form k*2^(k-1) - 1, and A230769 for the corresponding indices k (minus 1). - M. F. Hasler, Mar 01 2014
MATHEMATICA
Select[Table[n*2^(n-1)+1, {n, 150}], PrimeQ] (* Harvey P. Dale, Jul 17 2018 *)
PROG
(PARI) lista(nn) = {for (n=1, nn, if (isprime(p = n*2^(n-1)+1), print1(p, ", ")); ); } \\ Michel Marcus, Nov 09 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Sep 29 2011
STATUS
approved
