login
A261598
Product of sexagesimal digits of Fibonacci numbers in base-60 representation.
4
0, 1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 29, 48, 159, 102, 100, 432, 962, 172, 369, 2340, 156, 2420, 14763, 29952, 25000, 18447, 67716, 22848, 63800, 21420, 217854, 2250, 35264, 34944, 99330, 14364, 1300500, 0, 8726016, 2303910, 544272, 9728000, 5615610, 8419950
OFFSET
0,4
COMMENTS
a(n) is the product of the terms in the n-th row of table A261575.
Conjecture: a(n) = 0 for n > 3329 (empirically checked up to 36000).
LINKS
Eric Weisstein's World of Mathematics, Sexagesimal
Wikipedia, Sexagesimal
MAPLE
a:= n-> mul(i, i=convert((<<0|1>, <1|1>>^n)[1, 2], base, 60)):
seq(a(n), n=0..44); # Alois P. Heinz, Jan 22 2022
MATHEMATICA
Apply[Times, IntegerDigits[Fibonacci[Range[0, 50]], 60], {1}] (* Paolo Xausa, Feb 19 2024 *)
PROG
(Haskell)
a261598 = product . a261575_row
(PARI) a(n) = if (n, vecprod(digits(fibonacci(n), 60)), 0); \\ Michel Marcus, Jan 22 2022
CROSSREFS
KEYWORD
nonn,look,base
AUTHOR
Reinhard Zumkeller, Sep 09 2015
STATUS
approved