Curve fitting using Pajecka magic formula

Objective: clear all close all clc load tire_test_data a =tire_test_data(:,1); Mz=tire_test_data(:,2); plot(a, Mz,'o') set(gca,'fontsize',18); title('Pacjecka magic formula'); xlabel('slip angle'); ylabel('Self-aligning torque Mz') hold on Bz=0.2083;Cz=2.17;Dz=60;Ez=-2.4;Shz=0;Svz=0; for i=1:101 a1(i)=(i-1)*0.14; phi_z=(1-Ez)*(a1(i)+Shz)…