Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A129339
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A129339 Main diagonal of triangular array T: T(j,1) = 1 for ((j-1) mod 6) < 3, else 0; T(j,k) = T(j-1,k-1) + T(j,k-1) for 2 <= k <= j. +0
15
1, 2, 4, 7, 11, 16, 23, 37, 74, 175, 431, 1024, 2291, 4825, 9650, 18571, 34955, 65536, 124511, 242461, 484922, 989527, 2038103, 4194304, 8565755, 17308657, 34617314, 68703187, 135812051, 268435456, 532087943, 1059392917, 2118785834 (list; graph; listen)
OFFSET

1,2

LINKS

Paul Curtz, Comments on this sequence

FORMULA

G.f.: (1-x)^3/((1-2*x)*(1-3*x+3*x^2)).

a(1) = 1, a(2) = 2, a(3) = 4, a(4) = 7; for n > 4, a(n) = 5*a(n-1) - 9*a(n-2) + 6*a(n-3).

Binomial transform of A088911. - Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Jun 17 2007

EXAMPLE

First seven rows of T are

[ 1 ]

[ 1, 2 ]

[ 1, 2, 4 ]

[ 0, 1, 3, 7 ]

[ 0, 0, 1, 4, 11 ]

[ 0, 0, 0, 1, 5, 16 ]

[ 1, 1, 1, 1, 2, 7, 23 ].

PROGRAM

(PARI) {m=33; v=concat([1, 2, 4, 7], vector(m-4)); for(n=5, m, v[n]=5*v[n-1]-9*v[n-2]+6*v[n-3]); v} /* Klaus Brockhaus, Jun 10 2007 */

(MAGMA) m:=33; M:=ZeroMatrix(IntegerRing(), m, m); for j:=1 to m do if (j-1) mod 6 lt 3 then M[j, 1]:=1; end if; end for; for k:=2 to m do for j:=k to m do M[j, k]:=M[j-1, k-1]+M[j, k-1]; end for; end for; [ M[n, n]: n in [1..m] ]; /* Klaus Brockhaus, Jun 10 2007 */

(MAGMA) m:=33; S:=[ [1, 1, 1, 0, 0, 0][(n-1) mod 6 + 1]: n in [1..m] ]; [ &+[ Binomial(i-1, k-1)*S[k]: k in [1..i] ]: i in [1..m] ]; - Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Jun 17 2007

CROSSREFS

Cf. A038504, A131022 (T read by rows), A131023 (first subdiagonal of T), A131024 (row sums of T), A131025 (antidiagonal sums of T). First through sixth column of T are in A088911, A131026, A131027, A131028, A131029, A131030 resp.

Sequence in context: A062433 A065095 A005253 this_sequence A011912 A063676 A099385

Adjacent sequences: A129336 A129337 A129338 this_sequence A129340 A129341 A129342

KEYWORD

nonn

AUTHOR

Paul Curtz (bpcrtz(AT)free.fr), May 28 2007

EXTENSIONS

Edited and extended by Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Jun 10 2007

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified July 26 13:41 EDT 2008. Contains 142293 sequences.


AT&T Labs Research