OFFSET
1,1
COMMENTS
EXAMPLE
a(3)=5^8=390625 because 5 is the 3rd prime number and 8 is the 3rd composite number.
MATHEMATICA
p2c[n_]:=Module[{prs=Prime[Range[n]], cmps}, cmps=Take[Complement[Range[4, Last[prs]], prs], n]; First[#]^Last[#]&/@Thread[{prs, cmps}]]; p2c[20] (* Harvey P. Dale, Jan 20 2012 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Christopher M. Tomaszewski (cmt1288(AT)comcast.net), Jul 28 2003
EXTENSIONS
Corrected and extended by Harvey P. Dale, Jan 20 2012
STATUS
approved