login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A005211 Record values in A005210.
(Formerly M0780)
5
1, 2, 3, 6, 11, 14, 29, 44, 64, 65, 74, 92, 106, 127, 153, 165, 211, 240, 248, 288, 359, 369, 417, 441, 469, 518, 581, 612, 625, 666, 677, 707, 804, 830, 928, 944, 1001, 1060, 1269, 1300, 1361, 1445, 1496, 1548, 1655, 1727, 1742, 1868, 1928, 2043, 2303, 2323, 2579, 2604, 2617 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

a(n) = A005210(A242014(n)). - Reinhard Zumkeller, Aug 11 2014

REFERENCES

Popular Computing (Calabasas, CA), Z-Sequences, Vol. 4 (No. 42, Sep 1976), pp. 12-16.

N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

LINKS

Reinhard Zumkeller and Alois P. Heinz, Table of n, a(n) for n = 1..1000 (first 250 terms from Reinhard Zumkeller)

Popular Computing (Calabasas, CA), Z-Sequences, continued. Annotated and scanned copy of pages 14, 15, 16, 18 of Vol. 5 (No. 56, Nov 1977).

J. Shallit, Letter to N. J. A. Sloane Mar 14, 1979, concerning A001787, A005209, A005210, A005211

MATHEMATICA

(* a = A005210 *) a[1] = a[2] = 1; a[n_] := a[n] = Abs[a[n-1] + 2 a[n-2] - n]; record = 0; A005211 = Reap[For[n = 1, n < 5000, n++, If[a[n] > record, record = a[n]; Sow[record]]]][[2, 1]] (* Jean-Fran├žois Alcover, Nov 06 2016 *)

PROG

(Haskell)

(a005211_list, a242014_list) = unzip $ (1, 1) : f 1 1 where

   f i x | y > x     = (y, i) : f (i + 1) y

         | otherwise = f (i + 1) x

         where y = a005210 i

-- Reinhard Zumkeller, Aug 11 2014

CROSSREFS

Cf. A005210, A242014.

Sequence in context: A042944 A163781 A090304 * A298702 A076307 A102990

Adjacent sequences:  A005208 A005209 A005210 * A005212 A005213 A005214

KEYWORD

nonn,easy,nice

AUTHOR

N. J. A. Sloane

EXTENSIONS

More terms from David W. Wilson

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 21 07:23 EDT 2019. Contains 321367 sequences. (Running on oeis4.)