سلام
مشکل برنامه زیر کجاست؟
close all
clear
clc
re=0.5;
syms k r n t z
s=k*r;
m=k*re;
eps=70/9600;
%*************************************
%for n=0
%*************************************
pin0= besseli(1,s);
;(pin01=besselk(1,m
pin04=pin0*pin01;
pin02=((1-eps)*besseli(0,m)*besselk(0,k)*diff(besselk(0,k))) ;
pin03=1/(eps*diff(besselk(0,k))*besseli(0,k)-besselk(0,k)*diff(besseli(0,k)));
pin07=pin03*pin02;
pin08=pin04*pin07;
%ezplot(pin08);
%*************************************
%for n=4
%*************************************
pin4= besseli(4,s);
pin41=besselk(4,m);
pin44=pin4*pin41;
pin42=((1-eps)*besseli(4,m)*besselk(4,k)*diff(besselk(4,k))) ;
pin43=1/(eps*diff(besselk(4,k))*besseli(4,k)-besselk(4,k)*diff(besseli(4,k)));
pin47=pin43*pin42;
pin48=2*pin44*pin47;
%pin9=cos(t);
%pin10=pin8*pin9;
%ezplot(pin47);
sigmakol=0;
sigma=pin48*cos(4*t)+pin08;
;(pin=cos(k*z
mul=sigma*pin;
symsum(mul,k , 1 ,10);
مشکل برنامه زیر کجاست؟
close all
clear
clc
re=0.5;
syms k r n t z
s=k*r;
m=k*re;
eps=70/9600;
%*************************************
%for n=0
%*************************************
pin0= besseli(1,s);
;(pin01=besselk(1,m
pin04=pin0*pin01;
pin02=((1-eps)*besseli(0,m)*besselk(0,k)*diff(besselk(0,k))) ;
pin03=1/(eps*diff(besselk(0,k))*besseli(0,k)-besselk(0,k)*diff(besseli(0,k)));
pin07=pin03*pin02;
pin08=pin04*pin07;
%ezplot(pin08);
%*************************************
%for n=4
%*************************************
pin4= besseli(4,s);
pin41=besselk(4,m);
pin44=pin4*pin41;
pin42=((1-eps)*besseli(4,m)*besselk(4,k)*diff(besselk(4,k))) ;
pin43=1/(eps*diff(besselk(4,k))*besseli(4,k)-besselk(4,k)*diff(besseli(4,k)));
pin47=pin43*pin42;
pin48=2*pin44*pin47;
%pin9=cos(t);
%pin10=pin8*pin9;
%ezplot(pin47);
sigmakol=0;
sigma=pin48*cos(4*t)+pin08;
;(pin=cos(k*z
mul=sigma*pin;
symsum(mul,k , 1 ,10);
دیدگاه