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

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A154843 Symmetrical triangular sequence of Stirling numbers (A048994) of the first kind: t(n,m)=StirlingS1[n, m] + StirlingS1[n, n - m]. 1
2, 1, 1, 1, -2, 1, 1, -1, -1, 1, 1, -12, 22, -12, 1, 1, 14, -15, -15, 14, 1, 1, -135, 359, -450, 359, -135, 1, 1, 699, -1589, 889, 889, -1589, 699, 1, 1, -5068, 13390, -15092, 13538, -15092, 13390, -5068, 1, 1, 40284, -109038, 113588, -44835, -44835, 113588 (list; table; graph; refs; listen; history; internal format)
OFFSET

0,1

COMMENTS

Except for the first two the row sums are zero.

FORMULA

t(n,m)=StirlingS1[n, m] + StirlingS1[n, n - m].

EXAMPLE

{2},

{1, 1},

{1, -2, 1},

{1, -1, -1, 1},

{1, -12, 22, -12, 1},

{1, 14, -15, -15, 14, 1},

{1, -135, 359, -450, 359, -135, 1},

{1, 699, -1589, 889, 889, -1589, 699, 1},

{1, -5068, 13390, -15092, 13538, -15092, 13390, -5068, 1},

{1, 40284, -109038, 113588, -44835, -44835, 113588, -109038, 40284, 1},

{1, -362925, 1027446, -1182150, 786953, -538650, 786953, -1182150, 1027446, -362925, 1}

MATHEMATICA

Clear[t, n, m]; t[n_, m_] = StirlingS1[n, m] + StirlingS1[n, n - m];

Table[Table[t[n, m], {m, 0, n}], {n, 0, 10}];

Flatten[%]

CROSSREFS

A048994

Sequence in context: A031230 A111616 A113120 * A062557 A193509 A003649

Adjacent sequences:  A154840 A154841 A154842 * A154844 A154845 A154846

KEYWORD

uned,tabl,sign

AUTHOR

Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Jan 16 2009

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .

Last modified February 16 04:47 EST 2012. Contains 205860 sequences.