$n=2$,$(-1)^{\lfloor n/2\rfloor}=-1$,验证:
- Simplify[Det[{{x2,y2},{x1,y1}}]==-Det[{{x1,y1},{x2,y2}}]]^1
复制代码
$n=3$,$(-1)^{\lfloor n/2\rfloor}=-1$,验证:
- Simplify[Det[{Cross[{x2,y2,z2},{x3,y3,z3}],Cross[{x1,y1,z1},{x3,y3,z3}],Cross[{x1,y1,z1},{x2,y2,z2}]}]==-Det[{{x1,y1,z1},{x2,y2,z2},{x3,y3,z3}}]^2]
复制代码
$n=4$,$(-1)^{\lfloor n/2\rfloor}=1$,验证:
- Simplify[Det[{Cross[{x2,y2,z2,w2},{x3,y3,z3,w3},{x4,y4,z4,w4}],Cross[{x1,y1,z1,w1},{x3,y3,z3,w3},{x4,y4,z4,w4}],Cross[{x1,y1,z1,w1},{x2,y2,z2,w2},{x4,y4,z4,w4}],Cross[{x1,y1,z1,w1},{x2,y2,z2,w2},{x3,y3,z3,w3}]}]==Det[{{x1,y1,z1,w1},{x2,y2,z2,w2},{x3,y3,z3,w3},{x4,y4,z4,w4}}]^3]
复制代码
$n=5$,$(-1)^{\lfloor n/2\rfloor}=1$,验证:
- Simplify[Det[{Cross[{x2,y2,z2,w2,u2},{x3,y3,z3,w3,u3},{x4,y4,z4,w4,u4},{x5,y5,z5,w5,u5}],Cross[{x1,y1,z1,w1,u1},{x3,y3,z3,w3,u3},{x4,y4,z4,w4,u4},{x5,y5,z5,w5,u5}],Cross[{x1,y1,z1,w1,u1},{x2,y2,z2,w2,u2},{x4,y4,z4,w4,u4},{x5,y5,z5,w5,u5}],Cross[{x1,y1,z1,w1,u1},{x2,y2,z2,w2,u2},{x3,y3,z3,w3,u3},{x5,y5,z5,w5,u5}],Cross[{x1,y1,z1,w1,u1},{x2,y2,z2,w2,u2},{x3,y3,z3,w3,u3},{x4,y4,z4,w4,u4}]}]==Det[{{x1,y1,z1,w1,u1},{x2,y2,z2,w2,u2},{x3,y3,z3,w3,u3},{x4,y4,z4,w4,u4},{x5,y5,z5,w5,u5}}]^4]
复制代码 |