A179085 Odd numbers having an odd sum of digits in their decimal representation.
1, 3, 5, 7, 9, 21, 23, 25, 27, 29, 41, 43, 45, 47, 49, 61, 63, 65, 67, 69, 81, 83, 85, 87, 89, 111, 113, 115, 117, 119, 131, 133, 135, 137, 139, 151, 153, 155, 157, 159, 171, 173, 175, 177, 179, 191, 193, 195, 197, 199, 201, 203, 205, 207, 209, 221, 223, 225, 227
Offset: 1
Links
Programs
-
Mathematica
Select[Range[1,227,2], OddQ[Total[IntegerDigits[#]]] &] (* Jayanta Basu, May 07 2013 *)
Comments