This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A100845 #18 Sep 08 2022 08:45:15
%S A100845 1,1,3,4,11,29,199,1364,39603,1860498,599074578,505019158607,
%T A100845 12360848946698171,1281597540372340914251,
%U A100845 16342986943522226847837781364,6050965600552329018623146299409643807,1888621362467059762119226660462223993033685748724
%N A100845 a(n) = L(P(n)), where P = A000041 (partition numbers) and L = A000032 (Lucas numbers).
%H A100845 Seiichi Manyama, <a href="/A100845/b100845.txt">Table of n, a(n) for n = 0..29</a>
%F A100845 a(n) = A000032(A000041(n)). - _David Wasserman_, Mar 04 2008
%e A100845 If n=4, L(P(4)) = 11.
%e A100845 If n=8, L(P(8)) = 39603.
%t A100845 Table[LucasL[PartitionsP[n]], {n, 0, 20}] (* _Vincenzo Librandi_, May 09 2016 *)
%o A100845 (Magma) [Lucas(NumberOfPartitions(n)): n in [0..20]]; // _Vincenzo Librandi_, May 09 2016
%K A100845 nonn
%O A100845 0,3
%A A100845 _Parthasarathy Nambi_, Jan 07 2005
%E A100845 More terms from _David Wasserman_, Mar 04 2008
%E A100845 Edited and offset changed by _Bruno Berselli_, May 09 2016