A309539 Positive numbers that contain both odd and even digits, with no digit repeated.

10, 12, 14, 16, 18, 21, 23, 25, 27, 29, 30, 32, 34, 36, 38, 41, 43, 45, 47, 49, 50, 52, 54, 56, 58, 61, 63, 65, 67, 69, 70, 72, 74, 76, 78, 81, 83, 85, 87, 89, 90, 92, 94, 96, 98, 102, 103, 104, 105, 106, 107, 108, 109, 120, 123, 124, 125, 126, 127, 128, 129, 130, 132, 134, 136

Offset

1,1

Comments

Unlike A318700, where digits can be repeated, this sequence is finite; last term is 9876543210.

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Example

49 and 50 are in the sequence but 19 and 20 are not.

Maple

filter:= proc(n) local L;
  L:= convert(n, base, 10);
  nops(L) = nops(convert(L, set)) and convert(L mod 2, set) = {0, 1};
end proc:
select(filter, [$10 .. 1000]); # Robert Israel, Jan 09 2025

Mathematica

boeQ[n_]:=Max[DigitCount[n]]==1&&IntegerLength[n]>Count[ IntegerDigits[ n], _?EvenQ]>0; Select[Range[150], boeQ] (* Harvey P. Dale, Jul 02 2020 *)

Prog

(PARI) isok(n) = my(d=digits(n)); (#d == #Set(d)) && #select(x->(x%2), d) && #select(x->!(x%2), d); \\ Michel Marcus, Aug 07 2019

Crossrefs

Cf. A318700, A010784.

Sequence in context: A380391 A318700 A180157 * A273492 A227870 A007958

Adjacent sequences: A309536 A309537 A309538 * A309540 A309541 A309542

Keyword

nonn,base,fini

Author

Enrique Navarrete, Aug 06 2019

Status

approved