STATUS
editing
approved
editing
approved
In base 2, n-a(n) is equal to n with all digits reverted (leading zeros not considered). For instance a(43)=23 -> 43 is 101011, 43-23 = 20 is 10100. - Paolo P. Lava, Mar 09 2010
approved
editing
reviewed
approved
proposed
reviewed
editing
proposed
P. Paul Weisenhorn, Josephus und seine Folgen, MNU, 59(2006), pp. 18-19.
proposed
editing
editing
proposed
Table[ FromDigits[ RotateLeft[ IntegerDigits[n, 2]], 2], {n, 0, 80}] (* Robert G. Wilson v , Sep 21 2003 *)
proposed
editing
editing
proposed
Flatten@Table[Range[1, 2^n - 1, 2], {n, 0, 5}] (* Birkas Gyorgy , Feb 07 2011 *)
m = 5; Range[2^m - 1] + 1 - Flatten@Table[Reverse@Range[2^n], {n, 0, m - 1}] (* Birkas Gyorgy , Feb 07 2011 *)