Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A280826
Numbers with an even number of digits and with an odd number of distinct digits.
3
11, 22, 33, 44, 55, 66, 77, 88, 99, 1002, 1003, 1004, 1005, 1006, 1007, 1008, 1009, 1012, 1013, 1014, 1015, 1016, 1017, 1018, 1019, 1020, 1021, 1022, 1030, 1031, 1033, 1040, 1041, 1044, 1050, 1051, 1055, 1060, 1061, 1066, 1070, 1071, 1077, 1080, 1081, 1088, 1090, 1091, 1099, 1102, 1103, 1104, 1105, 1106, 1107, 1108, 1109
OFFSET
1,1
LINKS
FORMULA
A000035(A055642(a(n))) = 0.
A000035(A043537(a(n))) = 1.
MATHEMATICA
Select[Range[1110], Mod[Length[IntegerDigits[#1]], 2] == 0 && Mod[Length[Union[IntegerDigits[#1]]], 2] == 1 & ]
endQ[n_]:=Module[{idn=IntegerDigits[n]}, EvenQ[Length[idn]]&&OddQ[ Length[ Union[ idn]]]]; Select[Range[1200], endQ] (* Harvey P. Dale, Mar 31 2019 *)
KEYWORD
nonn,base,easy
AUTHOR
Ilya Gutkovskiy, Jan 08 2017
STATUS
approved