|
%I #21 Jun 04 2023 15:27:39
%S 0,1,2,3,4,5,6,7,8,9,10,12,13,14,15,16,17,18,19,20,21,23,24,25,26,27,
%T 28,29,30,31,32,34,35,36,37,38,39,40,41,42,43,45,46,47,48,49,50,51,52,
%U 53,54,56,57,58,59,60,61,62,63,64,65,67,68,69,70,71,72,73,74,75,76,78,79,80,81,82,83,84,85,86,87,89,90,91,92,93,94,95,96,97,98,101,102,103,104,105,106,107,108,109,110
%N Numbers in which the two least-significant digits are distinct.
%C More than the usual number of terms are displayed in order to show the difference from some closely-related sequences.
%H Reinhard Zumkeller, <a href="/A241157/b241157.txt">Table of n, a(n) for n = 1..10000</a>
%o (Haskell)
%o a241157 n = a241157_list !! (n-1)
%o a241157_list = 0 : filter f [0..] where
%o f x = d' /= d where d' = mod x' 10; (x', d) = divMod x 10
%o -- _Reinhard Zumkeller_, May 02 2014
%Y Cf. A010784, A241158.
%K nonn,base
%O 1,3
%A _N. J. A. Sloane_, Apr 18 2014
|
