CD=S01*S12*S23*S34*S45*S56*S67
CD =
[ sin(q5)*(sin(q1)*sin(q4) - cos(q4)*(cos(q1)*sin(q3)*sin(q2 + pi/2) - cos(q1)*cos(q3)*cos(q2 + pi/2))) + cos(q5)*(cos(q1)*cos(q3)*sin(q2 + pi/2) + cos(q1)*cos(q2 + pi/2)*sin(q3)), sin(q6)*(cos(q5)*(sin(q1)*sin(q4) - cos(q4)*(cos(q1)*sin(q3)*sin(q2 + pi/2) - cos(q1)*cos(q3)*cos(q2 + pi/2))) - sin(q5)*(cos(q1)*cos(q3)*sin(q2 + pi/2) + cos(q1)*cos(q2 + pi/2)*sin(q3))) - cos(q6)*(cos(q4)*sin(q1) + sin(q4)*(cos(q1)*sin(q3)*sin(q2 + pi/2) - cos(q1)*cos(q3)*cos(q2 + pi/2))), sin(q6)*(cos(q4)*sin(q1) + sin(q4)*(cos(q1)*sin(q3)*sin(q2 + pi/2) - cos(q1)*cos(q3)*cos(q2 + pi/2))) + cos(q6)*(cos(q5)*(sin(q1)*sin(q4) - cos(q4)*(cos(q1)*sin(q3)*sin(q2 + pi/2) - cos(q1)*cos(q3)*cos(q2 + pi/2))) - sin(q5)*(cos(q1)*cos(q3)*sin(q2 + pi/2) + cos(q1)*cos(q2 + pi/2)*sin(q3))), l6*(sin(q5)*(sin(q1)*sin(q4) - cos(q4)*(cos(q1)*sin(q3)*sin(q2 + pi/2) - cos(q1)*cos(q3)*cos(q2 + pi/2))) + cos(q5)*(cos(q1)*cos(q3)*sin(q2 + pi/2) + cos(q1)*cos(q2 + pi/2)*sin(q3))) - l4*(cos(q1)*sin(q3)*sin(q2 + pi/2) - cos(q1)*cos(q3)*cos(q2 + pi/2)) + l5*(cos(q1)*cos(q3)*sin(q2 + pi/2) + cos(q1)*cos(q2 + pi/2)*sin(q3)) + l2*cos(q1) + l3*cos(q1)*cos(q2 + pi/2)]
[ cos(q5)*(cos(q3)*sin(q1)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q1)*sin(q3)) - sin(q5)*(cos(q1)*sin(q4) + cos(q4)*(sin(q1)*sin(q3)*sin(q2 + pi/2) - cos(q3)*cos(q2 + pi/2)*sin(q1))), cos(q6)*(cos(q1)*cos(q4) - sin(q4)*(sin(q1)*sin(q3)*sin(q2 + pi/2) - cos(q3)*cos(q2 + pi/2)*sin(q1))) - sin(q6)*(cos(q5)*(cos(q1)*sin(q4) + cos(q4)*(sin(q1)*sin(q3)*sin(q2 + pi/2) - cos(q3)*cos(q2 + pi/2)*sin(q1))) + sin(q5)*(cos(q3)*sin(q1)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q1)*sin(q3))), - sin(q6)*(cos(q1)*cos(q4) - sin(q4)*(sin(q1)*sin(q3)*sin(q2 + pi/2) - cos(q3)*cos(q2 + pi/2)*sin(q1))) - cos(q6)*(cos(q5)*(cos(q1)*sin(q4) + cos(q4)*(sin(q1)*sin(q3)*sin(q2 + pi/2) - cos(q3)*cos(q2 + pi/2)*sin(q1))) + sin(q5)*(cos(q3)*sin(q1)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q1)*sin(q3))), l5*(cos(q3)*sin(q1)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q1)*sin(q3)) - l4*(sin(q1)*sin(q3)*sin(q2 + pi/2) - cos(q3)*cos(q2 + pi/2)*sin(q1)) - l6*(sin(q5)*(cos(q1)*sin(q4) + cos(q4)*(sin(q1)*sin(q3)*sin(q2 + pi/2) - cos(q3)*cos(q2 + pi/2)*sin(q1))) - cos(q5)*(cos(q3)*sin(q1)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q1)*sin(q3))) + l2*sin(q1) + l3*cos(q2 + pi/2)*sin(q1)]
[ cos(q4)*sin(q5)*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3)) - cos(q5)*(cos(q3)*cos(q2 + pi/2) - sin(q3)*sin(q2 + pi/2)), sin(q6)*(sin(q5)*(cos(q3)*cos(q2 + pi/2) - sin(q3)*sin(q2 + pi/2)) + cos(q4)*cos(q5)*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3))) + cos(q6)*sin(q4)*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3)), cos(q6)*(sin(q5)*(cos(q3)*cos(q2 + pi/2) - sin(q3)*sin(q2 + pi/2)) + cos(q4)*cos(q5)*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3))) - sin(q4)*sin(q6)*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3)), l1 + l4*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3)) - l5*(cos(q3)*cos(q2 + pi/2) - sin(q3)*sin(q2 + pi/2)) + l3*sin(q2 + pi/2) - l6*(cos(q5)*(cos(q3)*cos(q2 + pi/2) - sin(q3)*sin(q2 + pi/2)) - cos(q4)*sin(q5)*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3)))]
[ 0, 0, 0, 1]
Comprobación
- Posición Inicial
xe=0.55;ye=0;ze=0.805;
alfa=0;betha=0;gamma=0;
- Posición Intermedia
xe=0.824199;ye=0.02975;ze=0.340979;
alfa=0;betha=0;gamma=0;
- Posición Final
xe=0.158752;ye=0.790429;ze=0.492442;
alfa=0;betha=0;gamma=0;
J77r_simp =
[ sin(q4)*sin(q5)*(l2 + l4*(cos(q3)*cos(q2 + pi/2) + sin(q3)*sin(q2 + pi/2)) + l5*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3)) + l3*cos(q2 + pi/2)), cos(q5)*(l4 + l3*cos(q3)) + cos(q4)*sin(q5)*(l5 + l3*sin(q3)), l4*cos(q5) + l5*cos(q4)*sin(q5), 0, 0, 0]
[ l6*(cos(q6)*(sin(q5)*(cos(q3)*cos(q2 + pi/2) + sin(q3)*sin(q2 + pi/2)) + cos(q4)*cos(q5)*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3))) + sin(q4)*sin(q6)*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3))) + cos(q4)*cos(q6)*(l2 + l4*(cos(q3)*cos(q2 + pi/2) + sin(q3)*sin(q2 + pi/2)) + l5*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3)) + l3*cos(q2 + pi/2)) + cos(q5)*sin(q4)*sin(q6)*(l2 + l4*(cos(q3)*cos(q2 + pi/2) + sin(q3)*sin(q2 + pi/2)) + l5*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3)) + l3*cos(q2 + pi/2)), l6*(cos(q4)*sin(q6) + cos(q5)*cos(q6)*sin(q4)) + sin(q6)*(sin(q5)*(l4 + l3*cos(q3)) + cos(q4)*cos(q5)*(l5 + l3*sin(q3))) + cos(q6)*sin(q4)*(l5 + l3*sin(q3)), l6*(cos(q4)*sin(q6) + cos(q5)*cos(q6)*sin(q4)) + sin(q6)*(l4*sin(q5) + l5*cos(q4)*cos(q5)) + l5*cos(q6)*sin(q4), l6*cos(q6)*sin(q5), l6*sin(q6), 0]
[ l6*(sin(q6)*(sin(q5)*(cos(q3)*cos(q2 + pi/2) + sin(q3)*sin(q2 + pi/2)) + cos(q4)*cos(q5)*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3))) + cos(q6)*sin(q4)*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3))) + cos(q4)*sin(q6)*(l2 + l4*(cos(q3)*cos(q2 + pi/2) + sin(q3)*sin(q2 + pi/2)) + l5*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3)) + l3*cos(q2 + pi/2)) + cos(q5)*cos(q6)*sin(q4)*(l2 + l4*(cos(q3)*cos(q2 + pi/2) + sin(q3)*sin(q2 + pi/2)) + l5*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3)) + l3*cos(q2 + pi/2)), l6*(cos(q4)*cos(q6) + cos(q5)*sin(q4)*sin(q6)) + cos(q6)*(sin(q5)*(l4 + l3*cos(q3)) + cos(q4)*cos(q5)*(l5 + l3*sin(q3))) + sin(q4)*sin(q6)*(l5 + l3*sin(q3)), l6*(cos(q4)*cos(q6) + cos(q5)*sin(q4)*sin(q6)) + cos(q6)*(l4*sin(q5) + l5*cos(q4)*cos(q5)) + l5*sin(q4)*sin(q6), l6*sin(q5)*sin(q6), l6*cos(q6), 0]
[ cos(q5)*(cos(q3)*cos(q2 + pi/2) + sin(q3)*sin(q2 + pi/2)) + cos(q4)*sin(q5)*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3)), sin(q4)*sin(q5), sin(q4)*sin(q5), cos(q5), 0, 1]
[ sin(q6)*(sin(q5)*(cos(q3)*cos(q2 + pi/2) + sin(q3)*sin(q2 + pi/2)) + cos(q4)*cos(q5)*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3))) + cos(q6)*sin(q4)*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3)), cos(q4)*cos(q6) + cos(q5)*sin(q4)*sin(q6), cos(q4)*cos(q6) + cos(q5)*sin(q4)*sin(q6), sin(q5)*sin(q6), cos(q6), 0]
[ cos(q6)*(sin(q5)*(cos(q3)*cos(q2 + pi/2) + sin(q3)*sin(q2 + pi/2)) + cos(q4)*cos(q5)*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3))) + sin(q4)*sin(q6)*(cos(q3)*sin(q2 + pi/2) + cos(q2 + pi/2)*sin(q3)), cos(q4)*sin(q6) + cos(q5)*cos(q6)*sin(q4), cos(q4)*sin(q6) + cos(q5)*cos(q6)*sin(q4), cos(q6)*sin(q5), sin(q6), 0]
DET=
l3*cos(2*q4)*cos(2*q5)*cos(2*q6)^2*sin(q5)*(l2*l5*cos(q3) - l4^2*cos(q2) - l2*l4*sin(q3) + l4*l5*sin(q2) + l4^2*cos(q2)*cos(q3)^2 + l5^2*cos(q2)*cos(q3)^2 + l3*l4*sin(q2)*sin(q3) - 2*l4*l5*cos(q3)^2*sin(q2) + l4^2*cos(q3)*sin(q2)*sin(q3) - l5^2*cos(q3)*sin(q2)*sin(q3) - l3*l5*cos(q3)*sin(q2))