| In[1]:=     | << KnotTheory` | 
| Loading KnotTheory` (version of August 17, 2005, 14:44:34)... | 
| In[2]:= | Crossings[Knot[10, 94]] | 
| Out[2]=   | 10 | 
| In[3]:= | PD[Knot[10, 94]] | 
| Out[3]=   | PD[X[6, 2, 7, 1], X[2, 8, 3, 7], X[18, 12, 19, 11], X[14, 5, 15, 6], 
 X[20, 14, 1, 13], X[8, 15, 9, 16], X[10, 4, 11, 3], X[16, 9, 17, 10], 
X[4, 17, 5, 18], X[12, 20, 13, 19]] | 
| In[4]:= | GaussCode[Knot[10, 94]] | 
| Out[4]=   | GaussCode[1, -2, 7, -9, 4, -1, 2, -6, 8, -7, 3, -10, 5, -4, 6, -8, 9, 
  -3, 10, -5] | 
| In[5]:= | BR[Knot[10, 94]] | 
| Out[5]=   | BR[3, {1, 1, 1, -2, 1, 1, -2, -2, 1, -2}] | 
| In[6]:= | alex = Alexander[Knot[10, 94]][t] | 
| Out[6]=   |        -4   4    9    14             2      3    4
-15 - t   + -- - -- + -- + 14 t - 9 t  + 4 t  - t
             3    2   t
t    t | 
| In[7]:= | Conway[Knot[10, 94]][z] | 
| Out[7]=   |        2      4      6    8
1 - 2 z  - 5 z  - 4 z  - z | 
| In[8]:= | Select[AllKnots[], (alex === Alexander[#][t])&] | 
| Out[8]=   | {Knot[10, 94]} | 
| In[9]:= | {KnotDet[Knot[10, 94]], KnotSignature[Knot[10, 94]]} | 
| Out[9]=   | {71, 2} | 
| In[10]:= | J=Jones[Knot[10, 94]][q] | 
| Out[10]=   |       -3   3    6              2       3      4      5      6    7
-8 + q   - -- + - + 11 q - 12 q  + 11 q  - 9 q  + 6 q  - 3 q  + q
            2   q
q | 
| In[11]:= | Select[AllKnots[], (J === Jones[#][q] || (J /. q-> 1/q) === Jones[#][q])&] | 
| Out[11]=   | {Knot[10, 41], Knot[10, 94]} | 
| In[12]:= | A2Invariant[Knot[10, 94]][q] | 
| Out[12]=   |      -8    -6   2       2      4      6      8    10    14      16
1 + q   - q   + -- + 2 q  - 3 q  + 2 q  - 3 q  + q   - q   + 2 q   - 
                 4
               q
  18    20
q   + q | 
| In[13]:= | Kauffman[Knot[10, 94]][a, z] | 
| Out[13]=   |                                               2      2      2       2
   2    4    3 z   5 z   3 z            2   z    2 z    6 z    18 z
 3 + -- + -- - --- - --- - --- - a z - 7 z  - -- + ---- - ---- - ----- + 
     4    2    5     3     a                  8     6      4      2
   a    a    a     a                        a     a      a      a
              3      3       3       3                     4      4
    2  2   3 z    9 z    16 z    10 z         3       4   z    6 z
 2 a  z  - ---- + ---- + ----- + ----- + 6 a z  + 11 z  + -- - ---- + 
             7      5      3       a                       8     6
            a      a      a                               a     a
     4       4                5       5       5       5
 10 z    31 z       2  4   3 z    10 z    15 z    11 z         5
 ----- + ----- - 3 a  z  + ---- - ----- - ----- - ----- - 9 a z  - 
   4       2                 7      5       3       a
  a       a                 a      a       a
            6      6       6              7      7
     6   5 z    9 z    27 z     2  6   6 z    3 z         7      8
 12 z  + ---- - ---- - ----- + a  z  + ---- + ---- + 3 a z  + 4 z  + 
           6      4      2               5      3
          a      a      a               a      a
    8      8      9      9
 5 z    9 z    2 z    2 z
 ---- + ---- + ---- + ----
   4      2      3     a
a      a      a | 
| In[14]:= | {Vassiliev[2][Knot[10, 94]], Vassiliev[3][Knot[10, 94]]} | 
| Out[14]=   | {0, -2} | 
| In[15]:= | Kh[Knot[10, 94]][q, t] | 
| Out[15]=   |          3     1       2       1       4      2      4    4 q
7 q + 5 q  + ----- + ----- + ----- + ----- + ---- + --- + --- + 
              7  4    5  3    3  3    3  2      2   q t    t
            q  t    q  t    q  t    q  t    q t
    3        5        5  2      7  2      7  3      9  3      9  4
 6 q  t + 6 q  t + 5 q  t  + 6 q  t  + 4 q  t  + 5 q  t  + 2 q  t  + 
    11  4    11  5      13  5    15  6
4 q   t  + q   t  + 2 q   t  + q   t |