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 A117604 #10 Sep 27 2024 02:11:23 %S A117604 1,2,3,4,5,7,9,12,616,816,1432,1618192 %N A117604 Padovan numbers which can be divided by their multiplicative digital root. %C A117604 a(13), if it exists, is A000931(m) for some m >= 25000, and thus has over 3000 digits. - _Nathaniel Johnston_, May 05 2011 %t A117604 p=Rest[Union[LinearRecurrence[{0, 1, 1}, {1, 0, 0}, 71]]];Select[p,NestWhile[Times@@IntegerDigits[#] &, #, # > 9 &]>0&&Divisible[#,NestWhile[Times@@IntegerDigits[#] &, #, # > 9 &]]&] (* _James C. McMahon_, Sep 26 2024 *) %Y A117604 Cf. A000931, A031347. %K A117604 nonn,base %O A117604 1,2 %A A117604 Luc Stevens (lms022(AT)yahoo.com), Apr 05 2006 %E A117604 Offset changed from 0 to 1 and a(12) from _Nathaniel Johnston_, May 05 2011