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,3

Links

Seiichi Manyama, Table of n, a(n) for n = 0..29

Formula

a(n) = A000032(A000041(n)). - David Wasserman, Mar 04 2008

Example

If n=4, L(P(4)) = 11.
If n=8, L(P(8)) = 39603.

Mathematica

Table[LucasL[PartitionsP[n]], {n, 0, 20}] (* Vincenzo Librandi, May 09 2016 *)

Prog

(Magma) [Lucas(NumberOfPartitions(n)): n in [0..20]]; // Vincenzo Librandi, May 09 2016

Crossrefs

Sequence in context: A141723 A268478 A180363 * A019169 A049979 A084378

Adjacent sequences: A100842 A100843 A100844 * A100846 A100847 A100848

Keyword

nonn

Author

Parthasarathy Nambi, Jan 07 2005

Extensions

More terms from David Wasserman, Mar 04 2008

Edited and offset changed by Bruno Berselli, May 09 2016

Status

approved