A100404 a(n) = L(n) * n! where L(n) are the Lucas numbers.

2, 1, 6, 24, 168, 1320, 12960, 146160, 1895040, 27578880, 446342400, 7943443200, 154238515200, 3244277836800, 73491299481600, 1783667837952000, 46176597282816000, 1270159805730816000, 36992915271696384000, 1137260043722170368000, 36802508677688033280000

Offset

0,1

Links

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

Formula

E.g.f.: (2 - x) / (1 - x - x^2). - Ilya Gutkovskiy, Jun 07 2021

Example

If n=3, L(3) * 3! = 24.
If n=4, L(4) * 4! = 168.

Mathematica

Table[LucasL[n, 1]*n!, {n, 0, 20}] (* Zerinvary Lajos, Jul 09 2009 *)

Crossrefs

Cf. A000032, A005443.

Sequence in context: A371986 A268371 A318918 * A355005 A320570 A300911

Adjacent sequences: A100401 A100402 A100403 * A100405 A100406 A100407

Keyword

nonn

Author

Parthasarathy Nambi, Jan 11 2005

Extensions

Extended by Zerinvary Lajos, Jul 09 2009

Edited by R. J. Mathar, Jul 31 2009

Status

approved