哪位会编写这个分段函数？

复制以下代码到MATLAB command window； r=linspace(10^-5,6*10^-2,10^3); KL=0.6*r.*(r<6.67*10^-4)+4*10^-4.*(r>=6.67*10^-4); Vb=4474*r.^1.357.*(r<7*10^-4)+0.23.*((r>=7*10^-4)&(r<5.1*10^-3))+4.202*r.^0.547.*(r>=5.1*10^-3); figure plot(r,KL,'-r*'); hold on plot(r,Vb,'-go'); legend('K_L','V_b'); xlabel('r'); ylabel('value'); figure subplot(1,2,1) ; plot(r,KL,'-r*'); xlabel('r'); ylabel('K_L'); subplot(1,2,2); plot(r,Vb,'-go'); xlabel('r'); ylabel('v_b');