This site is supported by donations to The OEIS Foundation.

 Annual appeal: Please make a donation to keep the OEIS running! Over 6000 articles have referenced us, often saying "we discovered this result with the help of the OEIS". Other ways to donate

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A242357 Crescendo trapezoidal. 6
 1, 1, 2, 2, 1, 1, 2, 3, 3, 3, 2, 1, 1, 2, 3, 4, 4, 4, 4, 3, 2, 1, 1, 2, 3, 4, 5, 5, 5, 5, 5, 4, 3, 2, 1, 1, 2, 3, 4, 5, 6, 6, 6, 6, 6, 6, 5, 4, 3, 2, 1, 1, 2, 3, 4, 5, 6, 7, 7, 7, 7, 7, 7, 7, 6, 5, 4, 3, 2, 1, 1, 2, 3, 4, 5, 6, 7, 8, 8, 8, 8, 8, 8, 8, 8, 7 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,3 COMMENTS a(A000326(n)) = a(A143689(n-1)) = 1; for all n: a(k) = n, A104249(n-1) <= k <= A005448(n). LINKS Reinhard Zumkeller, Table of n, a(n) for n = 1..1001 EXAMPLE . Initial values . seen trapezoidal:                                  666666 .                                    55555          5......5 .                       4444        4.....4        4........4 .             333      3....3      3.......3      3..........3 .      22    2...2    2......2    2.........2    2............2 .  1  1..1  1.....1  1........1  1...........1  1..............1 . PROG (Haskell) import Data.List (inits) a242357 n = a242357_list !! (n-1) a242357_list = concatMap f \$ tail \$ inits [1..] where    f us = (init us) ++ (take v [v, v ..]) ++ vs           where (v:vs) = reverse us CROSSREFS Cf. A004737. Sequence in context: A004739 A156282 A203776 * A120423 A113137 A220603 Adjacent sequences:  A242354 A242355 A242356 * A242358 A242359 A242360 KEYWORD nonn AUTHOR Reinhard Zumkeller, May 11 2014 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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.