OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Range[900], Total[IntegerDigits[#]] == 17&] (* Vincenzo Librandi, Mar 07 2013 *)
PROG
(MAGMA) [n: n in [1..900] | &+Intseq(n) eq 17]; // Vincenzo Librandi, Mar 07 2013
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Vincenzo Librandi, Oct 13 2009
STATUS
editing