A259773 Product of the digits of the n-th Lucas number.
2, 1, 3, 4, 7, 1, 8, 18, 28, 42, 6, 81, 12, 10, 96, 72, 0, 105, 1960, 972, 70, 1344, 0, 0, 0, 1764, 672, 0, 0, 1440, 0, 0, 0, 24192, 0, 0, 34560, 0, 0, 1536, 43008, 0, 0, 0, 0, 0, 0, 41803776, 0, 0, 120960, 3024000, 0, 120960, 0, 0, 0, 6531840, 0, 440899200
Offset: 0
Examples
9349 is the 19th Lucas number; its digit product is 972, therefore a(19) = 972. 15127 is the 20th Lucas number; its digit product is 70, therefore a(20) = 70.
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Programs
-
Magma
[&*Intseq(Lucas(n)): n in [0..80]];
-
Mathematica
Table[Times@@IntegerDigits[LucasL[n]], {n, 0, 100}]
Comments