OFFSET
1,1
COMMENTS
The sequence is infinite since every number of the form 10^k for k >= 1 is in the sequence. It can be proved that 210 is the largest term with distinct digits.
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..10000 (first 291 terms from Metin Sariyar)
EXAMPLE
For a(4) = 210, 2 + 1 + 0 = 3, 210 = 2*3*5*7 with 4 distinct factors, 4 > 3 so 210 is a term.
MATHEMATICA
Select[Range[10^6], Total[IntegerDigits[#]]<Length[FactorInteger[#]]&]
Select[Range[120000], PrimeNu[#]>Total[IntegerDigits[#]]&] (* Harvey P. Dale, Jul 07 2020 *)
PROG
(PARI) isok(n) = omega(n) > sumdigits(n); \\ Michel Marcus, Sep 25 2019
(Magma) [k:k in [2..110000]| #PrimeDivisors(k) gt &+Intseq(k)]; // Marius A. Burtea, Oct 07 2019
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Metin Sariyar, Sep 25 2019
STATUS
approved