A064707 Inverse square of permutation defined by A003188.
0, 1, 2, 3, 5, 4, 7, 6, 10, 11, 8, 9, 15, 14, 13, 12, 21, 20, 23, 22, 16, 17, 18, 19, 31, 30, 29, 28, 26, 27, 24, 25, 42, 43, 40, 41, 47, 46, 45, 44, 32, 33, 34, 35, 37, 36, 39, 38, 63, 62, 61, 60, 58, 59, 56, 57, 53, 52, 55, 54, 48, 49, 50, 51, 85, 84, 87, 86, 80, 81, 82, 83
Offset: 0
Links
Programs
-
MATLAB
A = 1; for i = 1:7 B = A(end:-1:1); A = [A (B + length(A))]; end C = A(A); for i = 1:128 A(C(i)) = i - 1; end A
Formula
Extensions
More terms from David Wasserman, Aug 02 2002
Comments