%I A059747
%S A059747 2,3,4,5,8,12,15,17,20,21,45,48,87,97,113,120,172,217,228,276,312,580,
%T A059747 692,1132,1588,1668,2576,2591
%N A059747 Numbers n such that 3*2^n - 7 is prime.
%t A059747 Do[ If[ PrimeQ[ 3*2^n - 7 ], Print[n] ], {n, 1, 3000} ]
%Y A059747 Sequence in context: A122700 A048486 A065428 this_sequence A094087 A017821 
               A113439
%Y A059747 Adjacent sequences: A059744 A059745 A059746 this_sequence A059748 A059749 
               A059750
%K A059747 nonn,more
%O A059747 1,1
%A A059747 Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 10 2001