This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A259773 #25 Sep 08 2022 08:46:13 %S A259773 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, %T A259773 1764,672,0,0,1440,0,0,0,24192,0,0,34560,0,0,1536,43008,0,0,0,0,0,0, %U A259773 41803776,0,0,120960,3024000,0,120960,0,0,0,6531840,0,440899200 %N A259773 Product of the digits of the n-th Lucas number. %C A259773 Probably, the last nonzero term is a(401) = 2^71*3^45*5^9*7^4. - _Giovanni Resta_, Jul 14 2015 %H A259773 Vincenzo Librandi, <a href="/A259773/b259773.txt">Table of n, a(n) for n = 0..1000</a> %F A259773 a(n) = A007954(A000032(n)). - _Michel Marcus_, Jul 05 2015 %e A259773 9349 is the 19th Lucas number; its digit product is 972, therefore a(19) = 972. %e A259773 15127 is the 20th Lucas number; its digit product is 70, therefore a(20) = 70. %t A259773 Table[Times@@IntegerDigits[LucasL[n]], {n, 0, 100}] %o A259773 (Magma) [&*Intseq(Lucas(n)): n in [0..80]]; %Y A259773 Cf. A000032, A007954, A139374, A246558. %K A259773 nonn,base %O A259773 0,1 %A A259773 _Vincenzo Librandi_, Jul 05 2015