% plot_crank_torque.m

clear; close all;

[LABEL,DATA] = MBDynLoad('crank_slider_2.jnt');

T_Crank = DATA(:,7,LABEL==2);

t = 1.e-2*[0:length(T_Crank)-1];

plot(t,T_Crank,'LineWidth',1.5);
grid on;
xlim([0,5]);
set(gca,'FontSize',14);
xlabel('Time (s)','FontSize',14);
ylabel('Crank Torque (Nm)','FontSize',14);