id:A057113 - OEIS Search Results

Search: id:A057113

Displaying 1-1 of 1 results found.

page 1

Positions of permutations produced by the transposition sequence A057112 in A055089.

+0
4

0, 1, 4, 5, 3, 2, 12, 13, 16, 22, 19, 18, 20, 10, 7, 6, 8, 14, 15, 9, 11, 21, 23, 17, 77, 76, 73, 72, 74, 75, 85, 84, 86, 80, 78, 79, 82, 92, 90, 91, 94, 88, 89, 95, 93, 83, 81, 87, 63, 62, 60, 61, 64, 65, 71, 70, 67, 53, 51, 50, 48, 54, 56, 57, 59, 69, 68, 58, 55, 49, 52, 66, 108, 109, 112, 113, 111, 110, 104, 105, 107, 117, 119, 118, 115, 101, 99, 98, 96, 102 (list; graph; listen)

	OFFSET	`0,3`
	FORMULA	`perm_ranks_seq := atp_perm_ranks(120);`
	MAPLE	`atp_perm_ranks := proc(upto_n) local t, a, p, i, k; p := convert([1], 'disjcyc'); k := nops(factorial_base(upto_n))+1; a := []; for i from 1 to upto_n do a := [op(a), PermRevLexRank(convert(p, 'permlist', k))]; t := adj_tp_seq(i); p := mulperms([[t, t+1]], p); od; RETURN(a); end;`
	CROSSREFS	`PermRevLexRank given in A056019.` `Sequence in context: A124118 A016716 A004485 this_sequence A060134 A138753 A069197` `Adjacent sequences: A057110 A057111 A057112 this_sequence A057114 A057115 A057116`
	KEYWORD	`nonn,fini`
	AUTHOR	`Antti Karttunen Aug 09 2000`

page 1

Search completed in 0.002 seconds

Last modified December 16 17:18 EST 2009. Contains 170825 sequences.

AT&T Labs Research