%I #15 Nov 03 2023 15:53:25
%S 1,4,5,8,13,27,30,59,79,101,107,115,132,153,182,206,241,260,332,344,
%T 370,437,493,521,541,587,602,660,710,812,829,838,868,979,1040,1079,
%U 1114,1240,1294,1367,1634,1713,1727,1779,1886,1929,1940,1984,2060,2246,2373
%N Where record values occur in A005210.
%C A005210(a(n)) = A005211(n).
%H Alois P. Heinz, <a href="/A242014/b242014.txt">Table of n, a(n) for n = 1..1000</a> (first 250 terms from Reinhard Zumkeller)
%t (* b = A005210 *) b[1] = b[2] = 1; b[n_] := b[n] = Abs[b[n-1] + 2 b[n-2] - n]; Reap[rec = 0; Do[bn = b[n]; If[bn > rec, rec = bn; Sow[n]], {n, 1, 3000}]][[2, 1]] (* _Jean-François Alcover_, Mar 12 2019 *)
%o (Haskell)
%o a242014 n = a242014_list !! (n-1)
%o -- For definition of a242014_list see A005211.
%Y Cf. A005210, A005211.
%K nonn
%O 1,2
%A _Reinhard Zumkeller_, Aug 11 2014