%I A056799
%S A056799 1,4,5,11,26,29,38,65,166,490,641
%N A056799 Numbers n such that 8*9^n +1 is prime.
%t A056799 Do[If[PrimeQ[8*9^n + 1], Print[n]], {n, 0, 1000}]
%Y A056799 Sequence in context: A036539 A000769 A050831 this_sequence A109503 A067371 
               A068719
%Y A056799 Adjacent sequences: A056796 A056797 A056798 this_sequence A056800 A056801 
               A056802
%K A056799 nonn
%O A056799 1,2
%A A056799 Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 22 2000