OFFSET
1,1
COMMENTS
Subsequence of A034052.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..10000
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 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Jaroslav Krizek, Nov 13 2011
STATUS
approved