OFFSET
1,1
FORMULA
12 is a term since it has 5 proper divisors (1,2,3,4,6), and 5 > sqrt(12).
MATHEMATICA
Select[Range[1, 10000000], Length[Divisors[#]] - 1 > Sqrt[#] &]
PROG
(PARI) for(k=1, 10^6, if(numdiv(k)-1 > sqrtint(k), print1(k, ", "))) \\ Joerg Arndt, Jan 06 2024
CROSSREFS
KEYWORD
nonn,fini,full
AUTHOR
Zdenek Cervenka, Dec 18 2023
STATUS
approved