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 A139374 #14 Sep 08 2022 08:45:33
%S A139374 2,1,3,4,7,2,9,11,11,13,6,19,7,8,15,14,11,16,27,25,16,23,21,26,20,28,
%T A139374 21,22,25,29,36,20,38,40,24,28,34,26,33,23,38,34,54,43,52,41,30,62,47,
%U A139374 46,39,49,43,47,45,47,47,58,33,73,43,53,33,68,56,70,45,43
%N A139374 Digit sum of Lucas numbers.
%H A139374 Irene Sermon, <a href="/A139374/b139374.txt">Table of n, a(n) for n = 0..10000</a>
%F A139374 a(n) = A007953(A000032(n)). - _Michel Marcus_, Jul 13 2015
%e A139374 15127 is the 20th Lucas number (A000032(20)) with digit sum 16, so a(20)=16.
%t A139374 Table[Total[IntegerDigits[LucasL[n]]], {n, 0, 100}] (* _T. D. Noe_, Oct 28 2013 *)
%o A139374 (Magma) [&+Intseq(Lucas(n)): n in [0..80]]; // _Vincenzo Librandi_, Jul 13 2015
%Y A139374 Cf. A000032, A004090, A007953.
%K A139374 nonn,base
%O A139374 0,1
%A A139374 _Parthasarathy Nambi_, Jun 08 2008