|
%I #10 Jul 13 2013 12:03:00
%S 1,2,9,26,42,57,75,76,103,116,122,143,151,172,191,197,224,236,251,266,
%T 288,316,327,338,356,372,385,401,451,482,490,501,541,558,578,586,621,
%U 636,644,670,678,692,724,735,776,801,826,851,864,872,890,906,915,924
%N Positions of records in A083382.
%H Reinhard Zumkeller, <a href="/A083383/b083383.txt">Table of n, a(n) for n = 0..250</a>
%o (Haskell)
%o a083383 n = a083383_list !! (n-1)
%o a083383_list = 1 : f 0 [2..] (tail a083382_list) where
%o f m (x:xs) (y:ys) | y <= m = f m xs ys
%o | otherwise = x : f y xs ys
%o -- _Reinhard Zumkeller_, Jun 10 2012
%K nonn,easy
%O 0,2
%A _N. J. A. Sloane_, Jun 06 2003
%E More terms from _Vladeta Jovovic_, Jun 06 2003
|
