OFFSET
1,1
COMMENTS
Also numbers having at least two partitions into digit values of their decimal representations: A061827(a(n)) > 1.
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
FORMULA
a(n) ~ n. - Charles R Greathouse IV, Feb 13 2017
MATHEMATICA
Select[Range[200], FreeQ[#, 0] && Length[Union[#]] > 1 & [IntegerDigits[#]] &] (* Paolo Xausa, May 06 2024 *)
PROG
(Haskell)
a125290 n = a125290_list !! (n-1)
a125290_list = filter ((> 1) . a043537) a052382_list
-- Reinhard Zumkeller, Jun 18 2013
(Python)
def ok(n): s = set(str(n)); return len(s) >= 2 and "0" not in s
print([k for k in range(124) if ok(k)]) # Michael S. Branicky, Dec 13 2021
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Reinhard Zumkeller, Nov 26 2006
EXTENSIONS
Name clarified by Michael S. Branicky, Dec 13 2021
STATUS
approved