%I #22 Apr 05 2022 03:08:13
%S 2,3,7,9,15,16,20,24,34,33,45,51,59,57,73,72,90,91,103,113,135,127,
%T 143,155,167,170,198,192,222,220,240,256,280,260,296,314,338,332,372,
%U 366,408,415,429,451,497,471,507,514,546,555,607,597,637,633,669,697
%N Sum of all the digits of n in every base from 2 to n-1.
%H Vincenzo Librandi, <a href="/A014837/b014837.txt">Table of n, a(n) for n = 3..10000</a>
%F a(n) = A043306(n) - 1. - _Amiram Eldar_, Apr 16 2021
%t Table[Plus @@ Flatten[Table[IntegerDigits[n, b], {b, 2, n - 1}]], {n, 3, 36}] (* _Alonso del Arte_, Mar 28 2009 *)
%o (Python)
%o from sympy.ntheory.digits import digits
%o def a(n): return sum(sum(digits(n, b)[1:]) for b in range(2, n))
%o print([a(n) for n in range(3, 59)]) # _Michael S. Branicky_, Apr 04 2022
%Y Cf. A043306.
%K nonn,base
%O 3,1
%A _Olivier GĂ©rard_