This site is supported by donations to The OEIS Foundation.

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A128118 At the n-th iteration the sequence of integers from n down to 1 are appended to the sequence a(n) times. 1
 1, 2, 1, 2, 1, 3, 2, 1, 4, 3, 2, 1, 4, 3, 2, 1, 5, 4, 3, 2, 1, 6, 5, 4, 3, 2, 1, 6, 5, 4, 3, 2, 1, 6, 5, 4, 3, 2, 1, 7, 6, 5, 4, 3, 2, 1, 7, 6, 5, 4, 3, 2, 1, 8, 7, 6, 5, 4, 3, 2, 1, 9, 8, 7, 6, 5, 4, 3, 2, 1, 9, 8, 7, 6, 5, 4, 3, 2, 1, 9, 8, 7, 6, 5, 4, 3, 2, 1, 9, 8, 7, 6, 5, 4, 3, 2, 1, 10, 9, 8, 7, 6, 5, 4, 3 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS Reed Kelly, Feb 15 2007, Table of n, a(n) for n = 1..555 EXAMPLE a(4) = 2 so 4,3,2,1,4,3,2,1 is added to the end of the sequence at the fourth iteration. MATHEMATICA crr[n_] := Module[ { A = {1, 2, 1, 2, 1}, i, j }, For [ i = 3, i <= n, i++, A = Join[ A, Flatten[ Table[ Range[i, 1, -1], {A[[i]]} ]]]; ]; A ] CROSSREFS Cf. A128117, A001462, A002260. Sequence in context: A087467 A231568 A227687 * A205696 A029635 A203301 Adjacent sequences:  A128115 A128116 A128117 * A128119 A128120 A128121 KEYWORD easy,nonn AUTHOR Reed Kelly, Feb 15 2007 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.

Last modified January 19 03:41 EST 2019. Contains 319284 sequences. (Running on oeis4.)