%I A059622
%S A059622 2,4,16,24,32,40,120,124,144,172,186,376,700,1232,1264,2894,5054
%N A059622 Numbers n such that (5*3^n - 7)/2 is prime.
%t A059622 Do[ If[ PrimeQ[ (5*3^n - 7)/2 ], Print[n] ], {n, 0, 10000} ]
%Y A059622 Sequence in context: A045521 A076434 A049441 this_sequence A131475 A045541 
               A153665
%Y A059622 Adjacent sequences: A059619 A059620 A059621 this_sequence A059623 A059624 
               A059625
%K A059622 nonn
%O A059622 1,1
%A A059622 Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 19 2001