OFFSET
1,1
COMMENTS
10^11 < a(21) <= 431711322112. a(22) <= 3421411213312. - Donovan Johnson, May 30 2010
Do all terms end in 2, i.e., is each term = 2 mod 10? (* Harvey P. Dale, May 26 2024 *)
EXAMPLE
E.g., 21312 (no zero in the string) gives 2+1+3+1+2 = 9 prime factors, namely, 2*2*2*2*2*2*3*3*37.
MATHEMATICA
t={}; Do[If[FreeQ[x=IntegerDigits[n], 0]&&PrimeOmega[n]==Total[x], AppendTo[t, n]], {n, 2, 3220000, 2}]; t (* Jayanta Basu, May 30 2013 *)
CROSSREFS
KEYWORD
nonn,base,nice,hard
AUTHOR
Patrick De Geest, Aug 15 1999
EXTENSIONS
a(15)-a(20) from Donovan Johnson, May 30 2010
a(21)-a(22) confirmed by Giovanni Resta, Jun 02 2013
a(23)-a(24) from Giovanni Resta, Apr 23 2017
STATUS
approved