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 A116964 #15 Aug 30 2025 02:31:53 %S A116964 17,181,2008,22269,143285,1692737,18772741,208192888,2308894509, %T A116964 14856075365,175506357617,1946395332181,21585855011608, %U A116964 138889450176440,1640808956134074,18196850168753057,201806160812417701,2238064619105347768,14400335971854080600,170122354174067662074 %N A116964 Sum of all n-digit Lucas numbers. %e A116964 The sum of all 1-digit Lucas numbers is 17, so a(1) = 17. %e A116964 The sum of all 2-digit Lucas numbers is 181, so a(2) = 181. %t A116964 Total/@Table[Select[Table[LucasL[n],{n,0,95}], IntegerLength[#]==i&], {i,20}] (* _Harvey P. Dale_, Mar 31 2011 *) %t A116964 nn = 20; t = Table[0, {nn}]; k = 0; While[luc = LucasL[k]; d = IntegerLength[luc]; d <= nn, t[[d]] = t[[d]] + luc; k++]; t (* _T. D. Noe_, Mar 31 2011 *) %Y A116964 Cf. A000032, A127390, A128823. %K A116964 nonn,base,changed %O A116964 1,1 %A A116964 _Parthasarathy Nambi_, May 27 2007 %E A116964 More terms from _Harvey P. Dale_, Mar 31 2011