A175527 Digit sum of 13^n.
1, 4, 16, 19, 22, 25, 37, 40, 34, 46, 67, 52, 55, 58, 97, 73, 85, 88, 91, 85, 115, 91, 121, 106, 109, 121, 133, 118, 121, 133, 163, 184, 169, 181, 193, 169, 172, 175, 178, 199, 193, 214, 226, 238, 169, 190, 247, 241, 208, 247, 232, 253, 292, 241, 316, 292, 268, 271, 301, 286, 298, 337, 304, 325
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Crossrefs
Programs
-
Mathematica
Table[Total[IntegerDigits[13^k]], {k,0,1000}]
-
PARI
a(n)=sumdigits(13^n); \\ Michel Marcus, Nov 01 2013
Formula
a(n) ~ 4.5*log_10(13)*n ~ 5.0127*n (conjectured). - M. F. Hasler, May 18 2017
Comments