A325401 minflip(n) = min(n, r(n)) where r(n) is the binary reverse of n.
0, 1, 1, 3, 1, 5, 3, 7, 1, 9, 5, 11, 3, 11, 7, 15, 1, 17, 9, 19, 5, 21, 13, 23, 3, 19, 11, 27, 7, 23, 15, 31, 1, 33, 17, 35, 9, 37, 25, 39, 5, 37, 21, 43, 13, 45, 29, 47, 3, 35, 19, 51, 11, 43, 27, 55, 7, 39, 23, 55, 15, 47, 31, 63
Offset: 0
Examples
a(2) = min(2, r(2))
= min(2, b'01')
= min(2,1)
= 1.
Links
- Francois Alcover, Table of n, a(n) for n = 0..16384
Programs
-
Maple
a:= proc(n) local m, r; m:=n; r:=0; while m>0 do r:=r*2+irem(m, 2, 'm') od; min(n, r) end: seq(a(n), n=0..127); # Alois P. Heinz, Apr 23 2019 -
PARI
a(n) = min(n, fromdigits(Vecrev(binary(n)), 2)); \\ Michel Marcus, Apr 23 2019
Formula
a(n) = min(n,A030101(n)).