|
%I #4 Nov 21 2012 17:43:03
%S 245,731,2189,19685,177149,531443,1594325,43046723,129140165,
%T 387420491,1162261469,3486784403,10460353205,31381059611,94143178829,
%U 847288609445,7625597484989,22876792454963,68630377364885,205891132094651
%N Numbers of the form 3^n+2 which are not primes.
%H Harvey P. Dale, <a href="/A132830/b132830.txt">Table of n, a(n) for n = 1..1000</a>
%t a = {}; c = 3^x + 2; Do[If[PrimeQ[c],0, AppendTo[a, c]], {x, 0, 100}]; a (*Artur Jasinski*)
%t Select[3^Range[0,30]+2,!PrimeQ[#]&] (* _Harvey P. Dale_, Nov 21 2012 *)
%Y Cf. A057735, A051783, A132829.
%K nonn
%O 1,1
%A _Artur Jasinski_, Sep 03 2007
|
