%I A059748
%S A059748 1,3,5,7,11,15,19,21,31,37,47,51,59,109,163,199,221,659,709,1795,2525
%N A059748 Numbers n such that 5*2^n + 7 is prime.
%t A059748 Do[ If[ PrimeQ[ 5*2^n + 7 ], Print[n] ], {n, 1, 3000} ]
%Y A059748 Sequence in context: A085493 A139252 A076245 this_sequence A122124 A007665 
               A062488
%Y A059748 Adjacent sequences: A059745 A059746 A059747 this_sequence A059749 A059750 
               A059751
%K A059748 nonn
%O A059748 1,2
%A A059748 Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 10 2001