|
%I #14 Jan 13 2021 17:57:20
%S 5,15,51,115,151,511,1115,1151,1511,5111,11115,11151,11511,15111,
%T 51111,111115,111151,111511,115111,151111,511111,1111115,1111151,
%U 1111511,1115111,1151111,1511111,5111111,11111115,11111151,11111511,11115111,11151111,11511111
%N Numbers with digital product = 5.
%C Subsequence of A034052.
%H Harvey P. Dale, <a href="/A199985/b199985.txt">Table of n, a(n) for n = 1..10000</a>
%p f:= proc(d) local b,i;
%p b:= (10^d-1)/9;
%p seq(b+4*10^i,i=0..d-1);
%p end proc:
%p seq(f(d),d=1..9);
%t Sort[FromDigits/@Flatten[Table[Permutations[PadRight[{5},n,1]],{n,9}],1]] (* _Harvey P. Dale_, Sep 03 2016 *)
%K nonn,base
%O 1,1
%A _Jaroslav Krizek_, Nov 13 2011
|
