|
Search: id:A064039
|
|
|
| A064039 |
|
Reversed inversion vectors for the permutations of A060117, presented as pseudo-decimal numbers. |
|
+0 4
|
|
| 0, 1, 10, 11, 21, 20, 100, 101, 110, 111, 121, 120, 210, 211, 200, 201, 220, 221, 311, 310, 321, 320, 301, 300, 1000, 1001, 1010, 1011, 1021, 1020, 1100, 1101, 1110, 1111, 1121, 1120, 1210, 1211, 1200, 1201, 1220, 1221, 1311, 1310, 1321, 1320, 1301, 1300
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
COMMENT
|
If one uses the ordering of A055089 instead of A060117 (procedure PermRevLexUnrank instead of PermUnrank3R) one gets A007623 (Integers written in factorial base) which is a permutation of this sequence.
|
|
MAPLE
|
[seq(SiteSwap2ToDec(Perm2InversionVector(PermUnrank3R(j))), j=0..119)];
Perm2InversionVector := proc(p) local n, i, j, a, c; n := nops(p); a := []; for i from 2 to n do c := 0; for j from 1 to i-1 do if(p[j] > p[i] then c := c+1; fi; od; a := [op(a), c]; od; RETURN(a); end;
|
|
CROSSREFS
|
SiteSwap2ToDec procedure given in A060496, and PermUnrank3R in A060117.
Adjacent sequences: A064036 A064037 A064038 this_sequence A064040 A064041 A064042
Sequence in context: A102626 A014418 A089591 this_sequence A022100 A041475 A041204
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Antti Karttunen Aug 23 2001
|
|
|
Search completed in 0.002 seconds
|