|
%I #18 Nov 08 2023 08:08:04
%S 19,8209,2097169,8589934609,2417851639229258349412369,
%T 680564733841876926926749214863536422929,
%U 62165404551223330269422781018352605012557018849668464680057997111644937126566671941649
%N Primes of the form 2^k + 17.
%F a(n) = 2^A057200(n) + 17. - _Elmo R. Oliveira_, Nov 08 2023
%e 19 = 2^1 + 17 is in the sequence;
%e 8209 = 2^13 + 17 is in the sequence.
%t Delete[Union[Table[If[PrimeQ[2^n + 17], 2^n + 17, 0], {n, 1, 300}]],1]
%o (Magma) [ a: n in [1..400] | IsPrime(a) where a is 2^n+17 ]; // _Vincenzo Librandi_, Nov 27 2010
%Y Cf. A000040, A057200, A057733 (2^k + 3), A123250 (2^k + 5), A104066 (2^k + 7), A156940 (2^k + 11), A104067 (2^k + 13).
%K nonn
%O 1,1
%A Edwin Dyke (ed.dyke(AT)btinternet.com), Feb 19 2009
%E a(7) from _Vincenzo Librandi_, Apr 29 2010
| 