%I #16 Jul 17 2018 15:12:00
%S 2,5,13,193,449,114689,1811939329,2434970217729660813313,
%T 4943727411754159833089,6731298963614255244763987969,
%U 2388456554926020709124028311441244161
%N Primes of the form n*2^(n-1)+1.
%C Generated by n = 1, 2, 3, 6, 7, 14, 27, 66, 67, 87, 115, .. = A029544(n)+1.
%C 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
%t Select[Table[n*2^(n-1)+1,{n,150}],PrimeQ] (* _Harvey P. Dale_, Jul 17 2018 *)
%o (PARI) lista(nn) = {for (n=1, nn, if (isprime(p = n*2^(n-1)+1), print1(p, ", ")););} \\ _Michel Marcus_, Nov 09 2013
%Y Cf. A005183.
%K nonn
%O 1,1
%A _Juri-Stepan Gerasimov_, Sep 29 2011
|