A226637 Numbers m having with m+1 no common digit in decimal representations.
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 19, 29, 39, 49, 59, 69, 79, 99, 199, 299, 399, 499, 599, 699, 799, 999, 1999, 2999, 3999, 4999, 5999, 6999, 7999, 9999, 19999, 29999, 39999, 49999, 59999, 69999, 79999, 99999, 199999, 299999, 399999
Offset: 1
Programs
-
Haskell
a226637 n = a226637_list !! (n-1) a226637_list = filter ((== 0) . a076489) [0..]
-
PARI
isok(k) = #setintersect(Set(digits(k)), Set(digits(k+1))) == 0; \\ Michel Marcus, Feb 07 2025