A251620 - OEIS

%I #5 Dec 06 2014 02:46:50

%S 1,2,3,4,9,10,15,16,22,23,30,31,43,51,61,62,79,87,88,101,114,127,132,

%T 142,153,158,167,175,194,204,215,222,233,238,247,274,283,296,301,324,

%U 329,338,355,364,375,386,393,414,423,430,435,452,479,490,497,506

%N Distinct terms in A249943.

%H Reinhard Zumkeller, <a href="/A251620/b251620.txt">Table of n, a(n) for n = 1..1000</a>

%o (Haskell)

%o import Data.List (group)

%o a251620 n = a251620_list !! (n-1)

%o a251620_list = map head $ group a249943_list

%Y Cf. A249943, A251621.

%K nonn

%O 1,2

%A _Reinhard Zumkeller_, Dec 06 2014