login
Positions of records in A083382.
2

%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