This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A176306 Triangle t(n,m)= 1 - A176304(m) -A176304(n-m) +A176304(n), read by rows, 0<=m<=n. 5
 1, 1, 1, 1, 0, 1, 1, 13, 13, 1, 1, 25, 38, 25, 1, 1, -185, -160, -160, -185, 1, 1, -779, -964, -952, -964, -779, 1, 1, 7497, 6718, 6520, 6520, 6718, 7497, 1, 1, 45907, 53404, 52612, 52402, 52612, 53404, 45907, 1, 1, -524629, -478722, -471238, -472042, -472042 (list; table; graph; refs; listen; history; text; internal format)
 OFFSET 0,8 COMMENTS Row sums are 1, 2, 2, 28, 90, -688, -4436, 41472, 356250, -3893260, -41666708,... LINKS FORMULA t(n,m) = t(n,n-m). EXAMPLE 1; 1, 1; 1, 0, 1; 1, 13, 13, 1; 1, 25, 38, 25, 1; 1, -185, -160, -160, -185, 1; 1, -779, -964, -952, -964, -779, 1; 1, 7497, 6718, 6520, 6520, 6718, 7497, 1; 1, 45907, 53404, 52612, 52402, 52612, 53404, 45907, 1; 1, -524629, -478722, -471238, -472042, -472042, -471238, -478722, -524629, 1; 1, -4249511, -4774140, -4728246, -4720774, -4721368, -4720774, -4728246, -4774140, -4249511, 1; MAPLE A176304 := proc(n)     if n = 0 then         0;     else         (-1)^n*n*procname(n-1)-1 ;     end if; end proc: A176306 := proc(n, m)     1-A176304(m)-A176304(n-m)+A176304(n) ; end proc: # R. J. Mathar, May 04 2013 MATHEMATICA a[0] = 0; a[n_] := a[n] = (-1)^n*n*a[n - 1] - 1; t[n_, m_] := t[n, m] = 1 - (a[m] + a[n - m] - a[n]); Table[Table[t[n, m], {m, 0, n}], {n, 0, 10}]; Flatten[%] CROSSREFS Sequence in context: A249998 A195210 A175850 * A291368 A051392 A291431 Adjacent sequences:  A176303 A176304 A176305 * A176307 A176308 A176309 KEYWORD sign,tabl AUTHOR Roger L. Bagula, Apr 14 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.

Last modified October 17 18:58 EDT 2019. Contains 328127 sequences. (Running on oeis4.)