This site is supported by donations to The OEIS Foundation.

 Annual Appeal: Please make a donation to keep the OEIS running. In 2018 we replaced the server with a faster one, added 20000 new sequences, and reached 7000 citations (often saying "discovered thanks to the OEIS"). Other ways to donate

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A290248 Number of partitions of the n-th Lucas number into Lucas parts (beginning with 1) (A000204). 0
 1, 2, 3, 6, 13, 39, 147, 755, 5230, 50282, 677730, 13010007, 359551127, 14457741910, 853120090801, 74437567936635, 9666377127590346, 1878877762201043122, 549363336929733878734, 242695457366120511255070, 16263199149257162654631846 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS FORMULA a(n) = [x^A000204(n)] Product_{k>=1} 1/(1 - x^A000204(k)). a(n) = A067592(A000204(n)). EXAMPLE a(4) = 6 because Lucas(4) = 7 and we have [7], [4, 3], [4, 1, 1, 1], [3, 3, 1], [3, 1, 1, 1, 1], [1, 1, 1, 1, 1, 1, 1]. MATHEMATICA Rest[Table[SeriesCoefficient[Product[1/(1 - x^LucasL[k]), {k, 1, n}], {x, 0, LucasL[n]}], {n, 0, 21}]] CROSSREFS Cf. A000204, A003263, A067592, A098641. Sequence in context: A065845 A137273 A135967 * A146000 A134737 A030733 Adjacent sequences:  A290245 A290246 A290247 * A290249 A290250 A290251 KEYWORD nonn AUTHOR Ilya Gutkovskiy, Jul 24 2017 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified December 15 17:45 EST 2018. Contains 318150 sequences. (Running on oeis4.)