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
Keywords
Examples
If n=3, L(3) * 3! = 24. If n=4, L(4) * 4! = 168.
Programs
-
Mathematica
Table[LucasL[n, 1]*n!, {n, 0, 20}] (* Zerinvary Lajos, Jul 09 2009 *)
Formula
E.g.f.: (2 - x) / (1 - x - x^2). - Ilya Gutkovskiy, Jun 07 2021
Extensions
Extended by Zerinvary Lajos, Jul 09 2009
Edited by R. J. Mathar, Jul 31 2009