login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A174669 Sequence A154690 adjusted to leading one:t(n,m)=A154690(n,m)-A154690(n,0)+1 0
1, 1, 1, 1, 4, 1, 1, 10, 10, 1, 1, 24, 32, 24, 1, 1, 58, 88, 88, 58, 1, 1, 140, 236, 256, 236, 140, 1, 1, 334, 628, 712, 712, 628, 334, 1, 1, 784, 1648, 1984, 1984, 1984, 1648, 784, 1, 1, 1810, 4240, 5536, 5536, 5536, 5536, 4240, 1810, 1, 1, 4116, 10676, 15296, 15776 (list; table; graph; refs; listen; history; text; internal format)
OFFSET

0,5

COMMENTS

Row sums are:

1, 2, 6, 22, 82, 294, 1010, 3350, 10818, 34246, 106834,...

LINKS

Table of n, a(n) for n=0..59.

FORMULA

t(n,m)=A154690(n,m)-A154690(n,0)+1

EXAMPLE

{1},

{1, 1},

{1, 4, 1},

{1, 10, 10, 1},

{1, 24, 32, 24, 1},

{1, 58, 88, 88, 58, 1},

{1, 140, 236, 256, 236, 140, 1},

{1, 334, 628, 712, 712, 628, 334, 1},

{1, 784, 1648, 1984, 1984, 1984, 1648, 784, 1},

{1, 1810, 4240, 5536, 5536, 5536, 5536, 4240, 1810, 1},

{1, 4116, 10676, 15296, 15776, 15104, 15776, 15296, 10676, 4116, 1}

MATHEMATICA

a = 2; b = 1;

t[n_, m_] = (a^m*b^(n - m) + b^m*a^(n - m))*Binomial[n, m];

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

Flatten[%]

CROSSREFS

A154690(n, m)

Sequence in context: A056939 A202924 A142595 * A140711 A164366 A121692

Adjacent sequences:  A174666 A174667 A174668 * A174670 A174671 A174672

KEYWORD

nonn,tabl,uned

AUTHOR

Roger L. Bagula, Mar 26 2010

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 April 19 06:10 EDT 2021. Contains 343105 sequences. (Running on oeis4.)