|
| |
|
|
A081407
|
|
4-th order non-linear ("factorial") recursion: a(0)=a(1)=a(2)=a(3)=1; a(n)=(n+1).a(n-4).
|
|
2
| |
|
|
1, 1, 1, 1, 5, 6, 7, 8, 45, 60, 77, 96, 585, 840, 1155, 1536, 9945, 15120, 21945, 30720, 208845, 332640, 504735, 737280, 5221125, 8648640, 13627845, 20643840, 151412625, 259459200, 422463195, 660602880, 4996616625, 8821612800
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,5
|
|
|
LINKS
| Reinhard Zumkeller, Table of n, a(n) for n = 0..1000
|
|
|
EXAMPLE
| Following sequences are interleaved: A007696: {5,45,585,..}; A000404: {6,60,840,..} A034176: {7,77,1155,..}; A034177: {8,96,1536,..}
|
|
|
MATHEMATICA
| f[x_] := (x+1)*f[x-4] f[0]=1; f[1]=1; f[2]=1; f[3]=1; Table[f[w], {w, 0, 40}]
|
|
|
PROG
| (Haskell)
a081407 n = a081408_list !! n
a081407_list = 1 : 1 : 1 : 1 : zipWith (*) [5..] a081407_list
-- Reinhard Zumkeller, Jan 05 2012
|
|
|
CROSSREFS
| Cf. A007696, A000404, A034176, A034177, A081405-A081407.
Sequence in context: A047575 A014097 A098670 * A205857 A196026 A191850
Adjacent sequences: A081404 A081405 A081406 * A081408 A081409 A081410
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), Apr 01 2003
|
| |
|
|
