A119252 Odd digits in decreasing order.
1, 3, 5, 7, 9, 31, 51, 53, 71, 73, 75, 91, 93, 95, 97, 531, 731, 751, 753, 931, 951, 953, 971, 973, 975, 7531, 9531, 9731, 9751, 9753, 97531
Offset: 1
Programs
-
Mathematica
Sort@Flatten@Table[FromDigits/@Subsets[Range[9,1,-2],{n}],{n,1,5}]
Comments