OFFSET
1,1
COMMENTS
There are exactly 64 such numbers while numbers with digit sum equal to 7 (A052221) are infinite.
MATHEMATICA
Union[Flatten[Table[FromDigits/@Select[Tuples[Range[7], n], Total[#]==7&], {n, 7}]]] (* Harvey P. Dale, Aug 29 2015 *)
PROG
(Python)
def ok(n): s = str(n); return '0' not in s and sum(map(int, s)) == 7
print(list(filter(ok, range(1111112)))) # Michael S. Branicky, Jul 16 2021
CROSSREFS
KEYWORD
base,fini,full,nonn
AUTHOR
Zak Seidov, May 20 2006
STATUS
approved