OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MATHEMATICA
a = {}; c = 3^x + 2; Do[If[PrimeQ[c], 0, AppendTo[a, c]], {x, 0, 100}]; a (*Artur Jasinski*)
Select[3^Range[0, 30]+2, !PrimeQ[#]&] (* Harvey P. Dale, Nov 21 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Artur Jasinski, Sep 03 2007
STATUS
approved