login
Positions of the permutations which have the same rank in A055089 and A060118, i.e., the fixed points of permutations A060120 and A060127.
3

%I #5 Jul 30 2017 22:50:43

%S 0,1,2,6,7,16,24,25,26,60,120,121,122,126,127,136,288,289,316,450,720,

%T 721,722,726,727,736,744,745,746,780,1680,1681,1682,1812,2592,5040,

%U 5041,5042,5046,5047,5056,5064,5065,5066,5100,5160,5161,5162,5166,5167

%N Positions of the permutations which have the same rank in A055089 and A060118, i.e., the fixed points of permutations A060120 and A060127.

%p map(sub1,positions(0,[seq(PermRevLexRank(PermUnrank3L(n))-n,n=0..6666)])); or map(sub1,positions(0,[seq(PermRank3L(PermRevLexUnrank(n))-n,n=0..6666)]));

%Y Cf. A060132.

%K nonn

%O 0,3

%A _Antti Karttunen_, Mar 02 2001