A246558 Product of the digits of the n-th Fibonacci number.

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

Alois P. Heinz, Table of n, a(n) for n = 0..1000

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

Cf. A000045, A004090, A076564.

Cf. A007954, A259773.

Cf. A261598.

Sequence in context: A003893 A152303 A064737 * A307638 A098906 A007887

Adjacent sequences: A246555 A246556 A246557 * A246559 A246560 A246561

Keyword

nonn,base,easy,less

Author

Indrani Das, Nov 12 2014

Status

approved