function yout=myplotP102
for n=300:1000
a(n)=((80000/(pi*625))/(n.^4)).*dblquad(@fun,0,15,0,2*pi,[],[],n);
n
end
plot(a);
function z=fun(x,y,n)
z=x.*(-8*x.^2-2*sqrt(6)*x.*cos(y)/n-1/(2*n.^2)).^2.*exp(-32*n.^2*x.^2-8*sqrt(6)*x.*cos(y)*n-3);
我的程序怎么画出来是条直线啊!图如下:
function yout=myplotP102
for n=300:1000
a(n)=((80000/(pi*625))/(n.^4)).*dblquad(@fun,0,15,0,2*pi,[],[],n);
n
end
plot(a);
function z=fun(x,y,n)
z=x.*(-8*x.^2-2*sqrt(6)*x.*cos(y)/n-1 ...