06-1350/Class Notes for Tuesday October 24: Difference between revisions

From Drorbn
Jump to navigationJump to search
No edit summary
 
(10 intermediate revisions by 2 users not shown)
Line 5: Line 5:
Believe or not, but the following questions are directly related to class material - specifically, to the determination of "[[The Envelope of The Alexander Polynomial]]".
Believe or not, but the following questions are directly related to class material - specifically, to the determination of "[[The Envelope of The Alexander Polynomial]]".


Let <math>S_n</math> denote the permutation group on <math>n</math> letters and let <math>{\mathbb Q}S_n</math> denote its group ring. Let <math>c:{\mathbb Q}S_n\to{\mathbb Q}</math> be the linear functional defined via its definition on generators by <math>c(\sigma)=1</math> if the permutation <math>\sigma</math> is cyclic, and <math>c(\sigma)=0</math> otherwise. Turn <math>c</math> into a (symmetric!) bilinear form (also called <math>c</math>) on <math>{\mathbb Q}\otimes{\mathbb Q}</math> by setting <math>c(\tau,\sigma):=c(\tau^{-1}\sigma)</math>.
Let <math>S_n</math> denote the permutation group on <math>n</math> letters and let <math>{\mathbb Q}S_n</math> denote its group ring. Let <math>c:{\mathbb Q}S_n\to{\mathbb Q}</math> be the linear functional defined via its definition on generators by <math>c(\sigma)=1</math> if the permutation <math>\sigma</math> is cyclic, and <math>c(\sigma)=0</math> otherwise. Turn <math>c</math> into a (symmetric!) bilinear form (also called <math>c</math>) on <math>{\mathbb Q}S_n\times{\mathbb Q}S_n</math> by setting <math>c(\tau,\sigma):=c(\tau\circ\sigma)</math>.


'''Question 1.''' Determine the kernel <math>\ker c</math> of the bilinear form <math>c</math>. (Recall that the kernel of a bilinear form <math>\gamma</math> is <math>\{w:\forall v,\ \gamma(v,w)=0\}</math>.
'''Question 1.''' Determine the kernel <math>\ker c</math> of the bilinear form <math>c</math>. (Recall that the kernel of a bilinear form <math>\gamma</math> is <math>\{w:\forall v,\ \gamma(v,w)=0\}</math>.

[[Image:TheHRelation.svg|thumb|550px|center|The H Relation]]


'''Question 2.''' For <math>n=4</math>, I know by a lengthy computation (see below) that <math>H</math> is in <math>\ker c</math>, where
'''Question 2.''' For <math>n=4</math>, I know by a lengthy computation (see below) that <math>H</math> is in <math>\ker c</math>, where
Line 18: Line 20:
|<math>\ \ = 2341-2413-3142+4123-4231-1324+3214+1432</math>
|<math>\ \ = 2341-2413-3142+4123-4231-1324+3214+1432</math>
|}
|}
(here <math>(jk)</math> denotes the transposition of <math>j</math> and <math>k</math>, <math>k_1k_2k_3k_4</math> denotes the permutation for which <math>i\mapsto k_i</math>, and the bracket is taken in the additive sense: <math>[\tau,\sigma]:=\tau\sigma-\sigma\tau)</math>. Do you have quicker explanation?
(here <math>(jk)</math> denotes the transposition of <math>j</math> and <math>k</math>, <math>k_1k_2k_3k_4</math> denotes the permutation for which <math>i\mapsto k_i</math>, and the bracket is taken in the additive sense: <math>[\tau,\sigma]:=\tau\sigma-\sigma\tau</math>). Do you have quicker explanation?


[[Image:The4YRelation.svg|thumb|440px|center|The 4Y Relation]]
==The Lengthy Computation==


'''Question 3.''' By another lengthy computation for <math>n=4</math>, I also know that <math>4Y\in\ker c</math>, where
The lengthy computation involves multiplying 24 "test permutations" against a linear combination of 8 permutations and counting cycles in the resulting 192 permutations. Here's a [http://www.wolfram.com Mathematica] session that does that:
<center><math>4Y=[(12),(23)]-[(23),(34)]+[(34),(41)]-[(41),(12)]</math>.</center>
Do you have quicker explanation?

'''Question 4.''' I suspect that in some sense, though I'm not sure in which, <math>H</math> and <math>4Y</math> generate the whole kernel or at least some easily definable special part of the kernel of <math>c</math> for ''all'' <math>n</math>. Can you make sense of that?

==The Lengthy Computations==

The lengthy computation for <math>H</math> (and likewise for <math>Y_4</math>) involves multiplying 24 "test permutations" against a linear combination of 8 permutations and counting cycles in the resulting 192 permutations. Here's a [http://www.wolfram.com Mathematica] session that does that:


{{In|n=1|in=<nowiki>S[n_] := (P @@@ Permutations[Range[n]]);
{{In|n=1|in=<nowiki>S[n_] := (P @@@ Permutations[Range[n]]);
Line 37: Line 47:
(c_*p1_P) ** p2_ := c p1 ** p2;
(c_*p1_P) ** p2_ := c p1 ** p2;
b[a_, b_] := a ** b - b ** a;</nowiki>}}
b[a_, b_] := a ** b - b ** a;</nowiki>}}



{{InOut|n=2|in=<nowiki>H = b[P[2, 1, 3, 4], b[P[3, 2, 1, 4], P[4, 2, 3, 1]]]
{{InOut|n=2|in=<nowiki>H = b[P[2, 1, 3, 4], b[P[3, 2, 1, 4], P[4, 2, 3, 1]]]
- P[1, 3, 2, 4] + P[1, 4, 3, 2] + P[3, 2, 1, 4] - P[4, 2, 3, 1]</nowiki>|out=<nowiki>-P[1, 3, 2, 4] + P[1, 4, 3, 2] + P[2, 3, 4, 1] - P[2, 4, 1, 3] -
- P[1, 3, 2, 4] + P[1, 4, 3, 2] + P[3, 2, 1, 4] - P[4, 2, 3, 1]</nowiki>|out=<nowiki>-P[1, 3, 2, 4] + P[1, 4, 3, 2] + P[2, 3, 4, 1] - P[2, 4, 1, 3] -
P[3, 1, 4, 2] + P[3, 2, 1, 4] + P[4, 1, 2, 3] - P[4, 2, 3, 1]</nowiki>}}
P[3, 1, 4, 2] + P[3, 2, 1, 4] + P[4, 1, 2, 3] - P[4, 2, 3, 1]</nowiki>}}



{{InOut|n=3|in=<nowiki>c[# ** H] & /@ S[4]</nowiki>|out=<nowiki>{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}</nowiki>}}
{{InOut|n=3|in=<nowiki>c[# ** H] & /@ S[4]</nowiki>|out=<nowiki>{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}</nowiki>}}


{{InOut|n=4|in=<nowiki>Y4 = b[P[2, 1, 3, 4], P[1, 3, 2, 4]] - b[P[1, 3, 2, 4], P[1, 2, 4, 3]] +
b[P[1, 2, 4, 3], P[4, 2, 3, 1]] - b[P[4, 2, 3, 1], P[2, 1, 3, 4]]</nowiki>|out=<nowiki>P[1, 3, 4, 2] - P[1, 4, 2, 3] - P[2, 3, 1, 4] + P[2, 4, 3, 1] +
P[3, 1, 2, 4] - P[3, 2, 4, 1] - P[4, 1, 3, 2] + P[4, 2, 1, 3]</nowiki>}}


{{InOut|n=5|in=<nowiki>c[# ** Y4] & /@ S[4]</nowiki>|out=<nowiki>{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}</nowiki>}}

==Scanned Notes==

{| align=left
|[[Image:06-1350-scan1024-0001.jpg|thumb]]
|[[Image:06-1350-scan1024-0002.jpg|thumb]]
|[[Image:06-1350-scan1024-0003.jpg|thumb]]
|}

Latest revision as of 14:37, 29 October 2006

What Cyclic Permutations Can't See

Believe or not, but the following questions are directly related to class material - specifically, to the determination of "The Envelope of The Alexander Polynomial".

Let denote the permutation group on letters and let denote its group ring. Let be the linear functional defined via its definition on generators by if the permutation is cyclic, and otherwise. Turn into a (symmetric!) bilinear form (also called ) on by setting .

Question 1. Determine the kernel of the bilinear form . (Recall that the kernel of a bilinear form is .

The H Relation

Question 2. For , I know by a lengthy computation (see below) that is in , where

(here denotes the transposition of and , denotes the permutation for which , and the bracket is taken in the additive sense: ). Do you have quicker explanation?

The 4Y Relation

Question 3. By another lengthy computation for , I also know that , where

.

Do you have quicker explanation?

Question 4. I suspect that in some sense, though I'm not sure in which, and generate the whole kernel or at least some easily definable special part of the kernel of for all . Can you make sense of that?

The Lengthy Computations

The lengthy computation for (and likewise for ) involves multiplying 24 "test permutations" against a linear combination of 8 permutations and counting cycles in the resulting 192 permutations. Here's a Mathematica session that does that:

In[1]:= S[n_] := (P @@@ Permutations[Range[n]]); c[p_P] := If[ Length[p] == Length[NestWhileList[p[[#]] &, p[[1]], # > 1 &]], 1, 0 ]; c[x_] := x /. p_P :> c[p]; Unprotect[NonCommutativeMultiply]; p1_P ** p2_P := p1 /. Thread[Rule[Range[Length[p2]], List @@ p2]]; p1_ ** (p2_ + p3_) := p1 ** p2 + p1 ** p3; (p1_ + p2_) ** p3_ := p1 ** p3 + p2 ** p3; p1_ ** (c_*p2_P) := c p1 ** p2; (c_*p1_P) ** p2_ := c p1 ** p2; b[a_, b_] := a ** b - b ** a;


In[2]:= H = b[P[2, 1, 3, 4], b[P[3, 2, 1, 4], P[4, 2, 3, 1]]] - P[1, 3, 2, 4] + P[1, 4, 3, 2] + P[3, 2, 1, 4] - P[4, 2, 3, 1]
Out[2]= -P[1, 3, 2, 4] + P[1, 4, 3, 2] + P[2, 3, 4, 1] - P[2, 4, 1, 3] - P[3, 1, 4, 2] + P[3, 2, 1, 4] + P[4, 1, 2, 3] - P[4, 2, 3, 1]


In[3]:= c[# ** H] & /@ S[4]
Out[3]= {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}


In[4]:= Y4 = b[P[2, 1, 3, 4], P[1, 3, 2, 4]] - b[P[1, 3, 2, 4], P[1, 2, 4, 3]] + b[P[1, 2, 4, 3], P[4, 2, 3, 1]] - b[P[4, 2, 3, 1], P[2, 1, 3, 4]]
Out[4]= P[1, 3, 4, 2] - P[1, 4, 2, 3] - P[2, 3, 1, 4] + P[2, 4, 3, 1] + P[3, 1, 2, 4] - P[3, 2, 4, 1] - P[4, 1, 3, 2] + P[4, 2, 1, 3]


In[5]:= c[# ** Y4] & /@ S[4]
Out[5]= {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}

Scanned Notes

06-1350-scan1024-0001.jpg
06-1350-scan1024-0002.jpg
06-1350-scan1024-0003.jpg