OFFSET
1,2
COMMENTS
236 is a member but 263, 326, 362, 623, 632 which are digit permutations of 236 are not included (unlike A037268).
By definition, this is a subsequence of A052382 (zeroless numbers). - Michel Marcus, Jul 06 2015
EXAMPLE
236 is a member as 1/2 + 1/3 + 1/6 = 1.
MAPLE
F:= proc(t, ns) option remember;
local n0, k, r;
if ns = [] then
if t = 0 then return {[]}
else return {}
fi;
fi;
n0:= ns[1];
`union`(seq(map(r -> [k, op(r)], procname(t - k/n0, ns[2..-1])), k=0..floor(t*n0)));
end proc:
g:= proc(t) local L, i; L:= [seq(i$t[i], i=1..9)]; add(L[i]*10^(nops(L)-i), i=1..nops(L)) end proc:
sort(convert(map(g, F(1, [$1..9])), list)); # Robert Israel, Jul 06 2015
PROG
(PARI) lista(nn) = {for (n=1, nn, d = digits(n); if (vecmin(d) && (vecsort(d)==d) && (sum(k=1, #d, 1/d[k])==1), print1(n, ", ")); ); } \\ Michel Marcus, Jul 06 2015
CROSSREFS
KEYWORD
base,fini,nonn,full
AUTHOR
Amarnath Murthy, Feb 17 2004
EXTENSIONS
More terms from Sam Handler (sam_5_5_5_0(AT)yahoo.com), Apr 17 2004
Incorrect term 39999 corrected to 33999 by Thomas Oléron Evans, Jul 06 2015
STATUS
approved