login
A261587
Sum of sexagesimal digits of Fibonacci numbers in base-60 representation.
4
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
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
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Sep 09 2015
STATUS
approved