OFFSET
1,1
COMMENTS
A025487: least integer of each prime signature; also products of primorial numbers A002110. - Robert G. Wilson v, Dec 14 2005
MATHEMATICA
PrimeExponents[n_] := Last /@ FactorInteger@n; lpe = {}; ln = {1}; Do[ pe = Sort@PrimeExponents@n; If[FreeQ[lpe, pe], AppendTo[lpe, pe]; AppendTo[ln, n]], {n, 15000}]; ln[[2# ]] & /@ Range@(Length@ln/2) (* Robert G. Wilson v *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Nov 20 2004
EXTENSIONS
More terms from Robert G. Wilson v, Dec 14 2005
STATUS
approved