%I A104069
%S A104069 47,4127,68719476767
%N A104069 Primes of the form 2^n+31.
%t A104069 a = Delete[Union[Flatten[Table[If [PrimeQ[2^n + 31] == True, 2^n + 31, 
               0], {n, 1, 400}]]], 1]
%Y A104069 Sequence in context: A052463 A005148 A123798 this_sequence A141797 A101629 
               A033520
%Y A104069 Adjacent sequences: A104066 A104067 A104068 this_sequence A104070 A104071 
               A104072
%K A104069 nonn,bref
%O A104069 1,1
%A A104069 Roger Lee Bagula (rlbagulatftn(AT)yahoo.com), Mar 02 2005