-
Notifications
You must be signed in to change notification settings - Fork 1
Expand file tree
/
Copy pathdwdq.m
More file actions
23 lines (19 loc) · 797 Bytes
/
dwdq.m
File metadata and controls
23 lines (19 loc) · 797 Bytes
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
function M = dwdq(str, q)
q1 = q(1);
q2 = q(2);
q3 = q(3);
M = zeros(1, 3);
if str == "zero"
return
end
if str == "manipulability" || str == "both"
M = [0, (sin(q2 + 2*q3) + 2*sin(2*q2 + q3) + sin(2*q2) + 2*sin(2*q2 + 2*q3) - sin(q2))/(2*(cos(q2) - cos(2*q2 + q3) - cos(2*q2)/2 - cos(2*q3) - cos(2*q2 + 2*q3) - cos(q2 + 2*q3) + cos(q3) + 5/2)^(1/2)), (2*sin(q2 + 2*q3) + sin(2*q2 + q3) + 2*sin(2*q3) + 2*sin(2*q2 + 2*q3) - sin(q3))/(2*(cos(q2) - cos(2*q2 + q3) - cos(2*q2)/2 - cos(2*q3) - cos(2*q2 + 2*q3) - cos(q2 + 2*q3) + cos(q3) + 5/2)^(1/2))];
else
if str == "jointLimits" || str == "both"
M = M + [ -(q1 - pi)/(12*pi^2), -(108*q2 - 57*pi)/(361*pi^2), -(q3 - pi)/(12*pi^2)];
else
disp("Invalid code");
return;
end
end
end