A100845 a(n) = L(P(n)), where P = A000041 (partition numbers) and L = A000032 (Lucas numbers).
1, 1, 3, 4, 11, 29, 199, 1364, 39603, 1860498, 599074578, 505019158607, 12360848946698171, 1281597540372340914251, 16342986943522226847837781364, 6050965600552329018623146299409643807, 1888621362467059762119226660462223993033685748724
Offset: 0
Keywords
Examples
If n=4, L(P(4)) = 11. If n=8, L(P(8)) = 39603.
Links
- Seiichi Manyama, Table of n, a(n) for n = 0..29
Programs
-
Magma
[Lucas(NumberOfPartitions(n)): n in [0..20]]; // Vincenzo Librandi, May 09 2016
-
Mathematica
Table[LucasL[PartitionsP[n]], {n, 0, 20}] (* Vincenzo Librandi, May 09 2016 *)
Formula
Extensions
More terms from David Wasserman, Mar 04 2008
Edited and offset changed by Bruno Berselli, May 09 2016