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 A014839 #15 Sep 07 2022 04:08:33 %S A014839 2,3,7,9,13,13,16,19,26,28,36,39,42,34,45,44,55,59,63,64,76,75,80,82, %T A014839 82,87,102,112,128,113,120,121,129,130,148,149,154,156,175,187,207, %U A014839 214,219,217,238,227,237,228,233,239,262,246,256,261,265,260,284,299 %N A014839 Sum of all the digits of n in every prime-power base from 2 to n-1. %t A014839 Table[Sum[If[PrimePowerQ[i], Mod[Total[IntegerDigits[n, i]], n], 0], {i, 2, n-1}], {n, 3, 60}] (* _Stefano Spezia_, Sep 06 2022 *) %Y A014839 Cf. A014836, A014837, A014838, A014840, A014841, A014842, A014843. %K A014839 nonn,base %O A014839 3,1 %A A014839 _Olivier Gérard_