A166370 Numbers whose sum of digits is 17.
89, 98, 179, 188, 197, 269, 278, 287, 296, 359, 368, 377, 386, 395, 449, 458, 467, 476, 485, 494, 539, 548, 557, 566, 575, 584, 593, 629, 638, 647, 656, 665, 674, 683, 692, 719, 728, 737, 746, 755, 764, 773, 782, 791, 809, 818, 827, 836, 845, 854, 863, 872
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Programs
-
Haskell
a166370 n = a166370_list !! (n-1) a166370_list = filter ((== 17) . a007953) [0..] -- Reinhard Zumkeller, Jul 17 2014
-
Magma
[n: n in [1..900] | &+Intseq(n) eq 17]; // Vincenzo Librandi, Mar 07 2013
-
Mathematica
Select[Range[900], Total[IntegerDigits[#]] == 17&] (* Vincenzo Librandi, Mar 07 2013 *)
Comments