%I A102907
%S A102907 13,19,37,739,6571,387420499,150094635296999131,
%T A102907 57264168970223481226273458862846808078011946899,
%U A102907 2465034704958067503996131453373943813074726512397600979
%N A102907 Primes of the form 3^n+10.
%t A102907 a = Delete[Union[Flatten[Table[If [PrimeQ[3^n + 10] == True, 3^n + 10, 
               0], {n, 1, 200}]]], 1]
%Y A102907 Sequence in context: A000922 A107188 A029478 this_sequence A096455 A124199 
               A119869
%Y A102907 Adjacent sequences: A102904 A102905 A102906 this_sequence A102908 A102909 
               A102910
%K A102907 nonn
%O A102907 1,1
%A A102907 Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Mar 01 2005