[go: up one dir, main page]

login
A246558
Product of the digits of the n-th Fibonacci number.
7
0, 1, 1, 2, 3, 5, 8, 3, 2, 12, 25, 72, 16, 18, 147, 0, 504, 315, 320, 32, 1260, 0, 49, 3360, 3456, 0, 162, 1728, 168, 720, 0, 7776, 0, 33600, 0, 30240, 0, 15680, 0, 311040, 0, 0, 326592, 435456, 0, 0, 0, 0, 0, 0, 0, 0, 0, 102060, 3951360, 24883200, 1411200
OFFSET
0,4
COMMENTS
a(n) > 0 iff n in A076564.
Probably, the last nonzero term is a(184). - Giovanni Resta, Jul 14 2015
LINKS
FORMULA
a(n) = A007954(A000045(n)). - Reinhard Zumkeller, Nov 17 2014
EXAMPLE
Fibonacci(7) = 13, thus a(7) = 1*3 = 3.
MATHEMATICA
Array[Times@@IntegerDigits@Fibonacci[#]&, 100, 0] (* Vincenzo Librandi, Jan 04 2020 *)
PROG
(Haskell)
a246558 = a007954 . a000045 -- Reinhard Zumkeller, Nov 17 2014
[0] cat [&*Intseq(Fibonacci(n)): n in [1..100]]; // Vincenzo Librandi, Jan 04 2020
CROSSREFS
KEYWORD
nonn,base,easy,less
AUTHOR
Indrani Das, Nov 12 2014
STATUS
approved