Annual Appeal: Please make a donation (tax deductible in USA) to keep the OEIS running. Over 5000 articles have referenced us, often saying "we discovered this result with the help of the OEIS".
This sequence is not a permutation of the integers which is self-inverse. But is it a permutation?
Table of n, a(n) for n=1..72.
f[n_] := BitXor[n, Floor[ Log[2, n]]]; Array[f, 75];
Sequence in context: A125764 A023897 A267100 * A276446 A100527 A276445
Adjacent sequences: A178751 A178752 A178753 * A178755 A178756 A178757
Robert G. Wilson v, Jun 09 2010