A261587 Sum of sexagesimal digits of Fibonacci numbers in base-60 representation.

0, 1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 30, 26, 56, 23, 20, 43, 63, 47, 51, 98, 31, 70, 101, 112, 95, 89, 125, 96, 103, 81, 125, 29, 95, 65, 101, 48, 149, 138, 169, 130, 122, 134, 138, 154, 174, 151, 148, 122, 152, 156, 131, 169, 241, 233, 179, 235, 178, 236

Offset

0,4

Comments

a(n) is the sum of the n-th row of table A261575.

Links

Reinhard Zumkeller, Table of n, a(n) for n = 0..10000

Eric Weisstein's World of Mathematics, Sexagesimal

Wikipedia, Sexagesimal

Maple

a:= n-> add(i, i=convert((<<0|1>, <1|1>>^n)[1, 2], base, 60)):
seq(a(n), n=0..60);  # Alois P. Heinz, Jan 22 2022

Mathematica

Table[Total[IntegerDigits[n, 60]], {n, Fibonacci[Range[0, 60]]}] (* Harvey P. Dale, Aug 02 2019 *)

Prog

(Haskell)
a261587 = sum . a261575_row
(PARI) a(n) = sumdigits(fibonacci(n), 60); \\ Michel Marcus, Jan 22 2022

Crossrefs

Cf. A261575, A000045, A004090, A261598.

Sequence in context: A261575 A261606 A261598 * A206139 A374765 A023440

Adjacent sequences: A261584 A261585 A261586 * A261588 A261589 A261590

Keyword

nonn,base,changed

Author

Reinhard Zumkeller, Sep 09 2015

Status

approved