A247616 - OEIS

%I #7 Sep 22 2014 02:46:52

%S 123,135,147,159,210,234,246,258,321,345,357,369,420,432,456,468,531,

%T 543,567,579,630,642,654,678,741,753,765,789,840,852,864,876,951,963,

%U 975,987,1234,1357,2345,2468,3210,3456,3579,4321,4567,5432,5678,6420,6543

%N Numbers with more than two distinct digits in arithmetic progression.

%C A135643 without repdigit numbers (cf. A010785);

%C finite sequence with last and largest term a(96) = 9876543210.

%H Reinhard Zumkeller, <a href="/A247616/b247616.txt">Table of n, a(n) for n = 1..96</a>

%e a(40) = 2468 with constant digit differences = +2;

%e a(41) = 3210 with constant digit differences = -1;

%e a(42) = 3456 with constant digit differences = +1.

%o (Haskell)

%o a247616 n = a247616_list !! (n-1)

%o a247616_list = filter f [100 .. 9876543210] where

%o    f x = head vs /= 0 && all (== 0) ws where

%o          ws = zipWith (-) (tail vs) vs

%o          vs = zipWith (-) (tail us) us

%o          us = map (read . return) $ show x

%Y Subsequence of A135643.

%K nonn,base,fini,full

%O 1,1

%A _Reinhard Zumkeller_, Sep 21 2014