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 A141324 #5 Sep 23 2018 13:59:13
%S A141324 0,1,1,10,10,19,19,37,28,37,37,37,37,46,73,55,55,64,73,73,64,82,73,
%T A141324 109,100,118,91,109,109,118,127,127,109,136,145,127,145,136,145,163,
%U A141324 145,154,172,190,127,181,199,208,217,190,181,235,235,253,226,217,226,235,262
%N A141324 Sum of digits of A002452(n).
%F A141324 a(n)=A007953(A002452(n)).
%p A141324 A002452 := proc(n) (9^n-1)/8 ; end: A007953 := proc(n) local i ; add(i,i=convert(n,base,10)) ; end: A141324 := proc(n) A007953(A002452(n)) ; end: for n from 0 to 80 do printf("%d,",A141324(n)) ; od: # _R. J. Mathar_, Aug 09 2008
%t A141324 Total[IntegerDigits[#]]&/@LinearRecurrence[{10,-9},{0,1},60] (* _Harvey P. Dale_, Sep 23 2018 *)
%Y A141324 Cf. A017173.
%K A141324 nonn,base
%O A141324 0,4
%A A141324 _Paul Curtz_, Aug 03 2008
%E A141324 Extended by _R. J. Mathar_, Aug 09 2008