(X-x0-12* Р(ki*ki+kr*kr)*dt*t).^2+6*(Y-12*kr*t*dt).^2+16/6)).^2; %满足条件的ktv方程Рh1=mesh(X,Y,u(:,:,1)); Рaxis([x_begin x_end y_begin y_end -4 6.5]) %确定坐标范围Рview(-35,45) %绘制视图Рgrid on %绘制坐标方格Рfor t=1:200 Рu(:,:,1)=16*(-4*(X-x0-12*(ki*ki+kr*kr)*dt*t).^2+6*(Y-12*kr*t*dt).^2+16/6)./((4*(X-x0-12*(ki*ki+kr*kr)*dt*t).^2+6*(Y-12*kr*t*dt).^2+16/6)).^2; Р set(h1,'zdata',u(:,:,1)); %设置句柄称为h1子图的属性Р pause(0.001) Рend %结束Р%KP2方程的孤波解Рclear Р[X,Y]=meshgrid(-10:0.3:20,-10:0.3:10); %定义数组向量РT=[0,1,2]; Рgrid off %删除坐标方格Рfor k=1:3; Р t=T(k); %设置时间参量Р z=2*(sech(X+Y-7*t)).^2; %初始条件Р figure %计数Р h=mesh(X,Y,z); %定义函数Р axis([-10,20,-10,10,0,10]) %设置坐标范围Р view(15,20) %制作视图Рend %结束Р%KP2方程双孤波解Рsyms x y t xx yy Рk1=1;k2=2;r1=1;r2=0;theta1=0;theta2=0; %传递给方程参数的值Рaa1=2.*k1.*(x+r1.*y-(4.*k1.^2+3.*r1.^2).*t) Р+theta1; %定义函数aa1