A199985 Numbers with digital product = 5.
5, 15, 51, 115, 151, 511, 1115, 1151, 1511, 5111, 11115, 11151, 11511, 15111, 51111, 111115, 111151, 111511, 115111, 151111, 511111, 1111115, 1111151, 1111511, 1115111, 1151111, 1511111, 5111111, 11111115, 11111151, 11111511, 11115111, 11151111, 11511111
Offset: 1
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..10000
Programs
-
Maple
f:= proc(d) local b,i; b:= (10^d-1)/9; seq(b+4*10^i,i=0..d-1); end proc: seq(f(d),d=1..9);
-
Mathematica
Sort[FromDigits/@Flatten[Table[Permutations[PadRight[{5},n,1]],{n,9}],1]] (* Harvey P. Dale, Sep 03 2016 *)
Comments