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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A130641 The first entry of the vector v[n]=M[n]v[n-1], where M[n] is a 7 X 7 matrix M[n] = [[n, 0, 0, 0, 0, 0, 1], [1, 0, 0, 0, 0, 0, 0], [0, 1, 0, 0, 0, 0, 0], [0, 0, 1, 0, 0, 0, 0], [0, 0, 0, 1, 0, 0, 0], [0, 0, 0, 0, 1, 0, 0], [0, 0, 0, 0, 0, 1, 0]] and v[0] is the column vector [0, 0, 0, 0, 0, 0, 1]. 0
0, 1, 2, 6, 24, 120, 720, 5040, 40321, 362891, 3628916, 39918100, 479017320, 6227225880, 87181167360, 1307717550721, 20923481174427, 355699183594175, 6402585344613250, 121649122026669070, 2432982446760607280 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

LINKS

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

MATHEMATICA

M[n_] := {{n, 0, 0, 0, 0, 0, 1}, {1, 0, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 0, 1, 0}}; v[0] = {0, 0, 0, 0, 0, 0, 1}; v[n_] := M[n].v[n - 1]; Table[v[n][[1]], {n, 0, 30}]

CROSSREFS

Sequence in context: A000142 A104150 A074166 * A129655 A114796 A265086

Adjacent sequences:  A130638 A130639 A130640 * A130642 A130643 A130644

KEYWORD

nonn

AUTHOR

Roger L. Bagula, Jun 19 2007

EXTENSIONS

Edited by N. J. A. Sloane, Jul 23 2007

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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 19 05:08 EDT 2018. Contains 316336 sequences. (Running on oeis4.)