OFFSET
1,1
EXAMPLE
a(5) = 1000000001= 7*11*13*19*52579 has five prime divisors.
MATHEMATICA
With[{c=10^Range[0, 40]+1}, Flatten[Table[Select[c, PrimeNu[#]==n&, 1], {n, 10}]]] (* Harvey P. Dale, Aug 12 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Aug 31 2003
EXTENSIONS
More terms from Sascha Kurz, Sep 22 2003
STATUS
approved