login
Padovan numbers which can be divided by the product of their digits.
1

%I #9 Sep 26 2024 16:22:40

%S 1,2,3,4,5,7,9,12,816

%N Padovan numbers which can be divided by the product of their digits.

%C Next term, a(10), if it exists, is > A000931(18440) with more than 2252 digits. - _R. J. Mathar_, Jan 21 2008

%t p=Rest[Union[LinearRecurrence[{0, 1, 1}, {1, 0, 0}, 71]]];Select[p,ContainsNone[IntegerDigits[#],{0}]&&Divisible[#,Times@@IntegerDigits@#]&] (* _James C. McMahon_, Sep 26 2024 *)

%Y Cf. A000931.

%K nonn,base

%O 1,2

%A Luc Stevens (lms022(AT)yahoo.com), Apr 05 2006