%I A057908
%S A057908 1,3,5,35,95,1323
%N A057908 Numbers n such that 4^n - n is prime.
%t A057908 Do[ If[ PrimeQ[ 4^n - n ], Print[ n ] ], {n, 0, 3000} ]
%Y A057908 Sequence in context: A052468 A055786 A001790 this_sequence A120828 A077784 
               A145640
%Y A057908 Adjacent sequences: A057905 A057906 A057907 this_sequence A057909 A057910 
               A057911
%K A057908 nonn
%O A057908 1,2
%A A057908 Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 16 2000