A280826 Numbers with an even number of digits and with an odd number of distinct digits.

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

Author

Ilya Gutkovskiy, Jan 08 2017

Keywords

• nonn
• base
• easy

Links

• Eric Weisstein's World of Mathematics, Digit
• Index entries for 10-automatic sequences.

Crossrefs

Cf. A000035, A001637, A043537, A055642, A280823, A280824, A280825.

Programs

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 *)

Formula

A000035(A055642(a(n))) = 0.

A000035(A043537(a(n))) = 1.