| ²é¿´: 462 | »Ø¸´: 5 | |||
| µ±Ç°Ö÷ÌâÒѾ´æµµ¡£ | |||
[½»Á÷]
¡¾ÇóÖú¡¿matlabÄ£Ä⹫ʽ
|
|||
|
ÎÒÏëÄ£Ä⸽¼þÖеĹ«Ê½£¬ÏÂÃæÊÇÎÒдµÄ³ÌÐò clc close all; syms xi eta tau ; a=1; tau=1; c=1500; rho=1000; N=100; %t=[0:1:1]; x=0; xi=300; eta=300; p1=zeros(N,1); %²ÉÑùµãÊý f=zeros(N,1); %xi etaÕ³ÖÍ rhoÃÜ¶È tau Âö¿í omega=sqrt(4*a^2*c.^2-a^4*((xi+(4*eta/3))/rho)^2); f(t)=tau*exp(-((t/pi).^2))/sqrt(pi); s(t)=diff(f)-((xi+(4*eta/3))/rho)*diff(f,2); for t=1:N p1(t)=exp(-(a^2)*((xi+(4*eta/3))/rho)*t)*sin(omega*t-a*x)/(2*omega); p(t)=conv(p1(t),s(t)); end plot(p) ±¨´íÈçÏ ??? Error using ==> unknown Matrix dimensions must agree. Error in ==> viscosityl at 18 s(t)=diff(f)-((xi+(4*eta/3))/rho)*diff(f,2); Çë¸ßÊÖ°ïæ¸ÄÕý£¬Ð»Ð» |
» ²ÂÄãϲ»¶
±¾¿Æ211£¬293·ÖÇëÇóµ÷¼Á
ÒѾÓÐ4È˻ظ´
Çóµ÷¼Á
ÒѾÓÐ3È˻ظ´
085400µç×ÓÐÅÏ¢319Çóµ÷¼Á£¨½ÓÊÜ¿çרҵµ÷¼Á£©
ÒѾÓÐ5È˻ظ´
268Çóµ÷¼Á
ÒѾÓÐ9È˻ظ´
һ־Ը˫·Ç085502£¬267·Ö£¬¹ýËļ¶Çóµ÷¼Á
ÒѾÓÐ3È˻ظ´
Ò»Ö¾Ô¸085404£¬×Ü·Ö291£¬Ëļ¶Òѹý£¬Çóµ÷¼Á
ÒѾÓÐ4È˻ظ´
297Çóµ÷¼Á
ÒѾÓÐ12È˻ظ´
26µ÷¼Á 086003
ÒѾÓÐ3È˻ظ´
265Çóµ÷¼Á
ÒѾÓÐ20È˻ظ´
271·ÖÇóµ÷¼ÁѧУ
ÒѾÓÐ11È˻ظ´
hitzhang
ľ³æ (ÕýʽдÊÖ)
- ·ÂÕæEPI: 1
- Ó¦Öú: 0 (Ó×¶ùÔ°)
- ¹ó±ö: 2.15
- ½ð±Ò: 1376.7
- É¢½ð: 969
- ºì»¨: 8
- Ìû×Ó: 862
- ÔÚÏß: 226.4Сʱ
- ³æºÅ: 390575
- ×¢²á: 2007-06-02
- ÐÔ±ð: GG
- רҵ: ÎÞ»ú·Ç½ðÊôÀàµç½éÖÊÓëµç½â
¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï
woshilsh(½ð±Ò+4,VIP+0):³£À´£¬ºðºð 4-25 13:42
loulou85(½ð±Ò+10,VIP+0): 4-25 15:43
woshilsh(½ð±Ò+4,VIP+0):³£À´£¬ºðºð 4-25 13:42
loulou85(½ð±Ò+10,VIP+0): 4-25 15:43
|
>> a=1; tau=1; c=1500; rho=1000; N=100; t=linspace(0,1,100); x=0; xi=300; eta=300; p1=zeros(N,1); %²ÉÑùµãÊý f=zeros(N,1); %xi etaÕ³ÖÍ rhoÃÜ¶È tau Âö¿í omega=sqrt(4*a^2*c.^2-a^4*((xi+(4*eta/3))/rho)^2); f=tau*exp(-((t/pi).^2))/sqrt(pi);d1=diff(f);d2=diff(f,2); s=d1(1 end-1))-((xi+(4*eta/3))/rho)*d2;for t=1 N-2)p1(t)=exp(-(a^2)*((xi+(4*eta/3))/rho)*t)*sin(omega*t-a*x)/(2*omega); p(t)=p1(t)*s(t); end >> plot(p) >> |
2Â¥2009-04-25 12:36:47
3Â¥2009-04-25 15:49:08
hitzhang
ľ³æ (ÕýʽдÊÖ)
- ·ÂÕæEPI: 1
- Ó¦Öú: 0 (Ó×¶ùÔ°)
- ¹ó±ö: 2.15
- ½ð±Ò: 1376.7
- É¢½ð: 969
- ºì»¨: 8
- Ìû×Ó: 862
- ÔÚÏß: 226.4Сʱ
- ³æºÅ: 390575
- ×¢²á: 2007-06-02
- ÐÔ±ð: GG
- רҵ: ÎÞ»ú·Ç½ðÊôÀàµç½éÖÊÓëµç½â
¡ï ¡ï ¡ï ¡ï ¡ï ¡ï
loulou85(½ð±Ò+3,VIP+0): 4-26 11:06
loulou85(½ð±Ò+1,VIP+0): 4-26 11:06
sunxiao(½ð±Ò+2,VIP+0):лл²ÎÓ룬»¶Ó³£À´·ÂÕæ±à³Ì°æ 4-26 23:52
loulou85(½ð±Ò+3,VIP+0): 4-26 11:06
loulou85(½ð±Ò+1,VIP+0): 4-26 11:06
sunxiao(½ð±Ò+2,VIP+0):лл²ÎÓ룬»¶Ó³£À´·ÂÕæ±à³Ì°æ 4-26 23:52
| t=linspace(0,1,100); %100µÄÒâ˼ÊÇ´Ó0µ½1µÈ¼ä¾àÈ¡100¸öµã |
4Â¥2009-04-25 19:06:52
5Â¥2009-04-26 11:07:36
forever_wc
ľ³æ (СÓÐÃûÆø)
- Ó¦Öú: 0 (Ó×¶ùÔ°)
- ½ð±Ò: 5124.4
- É¢½ð: 120
- ºì»¨: 2
- Ìû×Ó: 55
- ÔÚÏß: 4210.7Сʱ
- ³æºÅ: 756344
- ×¢²á: 2009-04-24
- רҵ: ´«ÈÈ´«ÖÊѧ
¡ï ¡ï
coldwind042(½ð±Ò+1,VIP+0):лл²ÎÓ룡 4-27 13:38
loulou85(½ð±Ò+1,VIP+0): 4-27 19:52
coldwind042(½ð±Ò+1,VIP+0):лл²ÎÓ룡 4-27 13:38
loulou85(½ð±Ò+1,VIP+0): 4-27 19:52
|
ͬÒâ3Â¥µÄ %100µÄÒâ˼ÊÇ´Ó0µ½1µÈ¼ä¾àÈ¡100¸öµã |
6Â¥2009-04-27 11:53:56














»Ø¸´´ËÂ¥
end-1))-((xi+(4*eta/3))/rho)*d2;
