OFFSET
1,2
EXAMPLE
The sequence of positive integers, each with 4 or more positive divisors, begins: 6,8,10,12,14,... The 4th of these is 12, so a(4) = 12.
MATHEMATICA
f[n_] := Block[{k = 0, c = n}, While[c > 0, k++; While[Length@Divisors[k] < n, k++ ]; c--; ]; k]; Table[f[n], {n, 50}] (* Ray Chandler, Nov 13 2006 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Oct 28 2006
EXTENSIONS
Extended by Ray Chandler, Nov 13 2006
STATUS
approved