A104697 Rearrangement of positive integers: change even digits d to 10-d.

1, 8, 3, 6, 5, 4, 7, 2, 9, 20, 11, 18, 13, 16, 15, 14, 17, 12, 19, 90, 81, 88, 83, 86, 85, 84, 87, 82, 89, 40, 31, 38, 33, 36, 35, 34, 37, 32, 39, 70, 61, 68, 63, 66, 65, 64, 67, 62, 69, 60, 51, 58, 53, 56, 55, 54, 57, 52, 59, 50, 41, 48, 43, 46, 45, 44, 47, 42, 49, 80, 71, 78

Offset

1,2

Comments

Note that digit 0 becomes 10, i.e. 0 with a 1 carried to the next place. - Robert Israel, Jun 26 2019

Links

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

Maple

f:= proc(n) local L;
  L:= subs(S, convert(n, base, 10));
  add(L[i]*10^(i-1), i=1..nops(L))
end proc;
map(f, [$1..100]); # Robert Israel, Jun 26 2019

Crossrefs

Cf. A104696.

Sequence in context: A308741 A304580 A304583 * A228211 A010522 A197332

Adjacent sequences: A104694 A104695 A104696 * A104698 A104699 A104700

Keyword

easy,nonn,base,look

Author

Zak Seidov, Mar 18 2005

Status

approved