²é¿´: 2268  |  »Ø¸´: 6

СÁõ8885

ľ³æ (ÕýʽдÊÖ)

[ÇóÖú] Matalab ³ÌÐòµ÷ÊÔ

ÏÂÊö³ÌÐòÔËÐгö´í£¬Çó¸ßÊÖÖ¸µã¡£ÕâÊÇÒ»¸öMÎļþ¡£

function f4=func_main(name,a,q1,q2,x2,flag)
% flag=0 represent complex permittivity
% flag=1 represent complex permeability
data=load(name);
xf=data(:,1);
if (flag==0)
    y1=data(:,2)+data(:,3)*i;
elseif (flag==1)
    y1=data(:,4)+data(:,5)*i;
else
    disp('0 is complex perimittivity, 1 is complex permeability');
    return;
end

x11=func1(a,q1,y1,x2);  
%µ÷Óú¯Êýfunc1£¬Çó½âx1
%Hanai formula µÄÇó½â½á¹û %Çó½âµÄÊÇx1£¬Îª¾ø¶Ô½éµç³£Êý
x1=x11;
a=real(x1);
b=imag(x1);
c=[a,b];

x0=zeros(length(data),1);
F=fsolve(@(y2)func2(a,q2,x1,x2,y2),x0);
%µ÷ÓÃǰÊöfunc1ËùÇóµÃµÄx1£¬´úÈ뺯Êýfunc2
%Çó½â³¬Ô½·½³ÌµÄy2Öµ¡£
f4=F;
r = [real(f4), imag(f4)];

plotyy(xf,a,xf,b);
save('data1.txt', 'c', '-ascii');
save('data2.txt', 'r', '-ascii');

function x1=func1(a,q1,y1,x2)
x1=(q1.*x2-x2+y1.*(x2./y1).^a)./(q1+(x2./y1).^a-1);
%Çó½âx1

function F=func2(a,q2,x1,x2,y2)
F=(((1-q2)*(x2-x1))./(x2^a)).*(y2.^a)-y2+x1;
%Çó½ây2



ÁíÍâµÄµ÷ÓôúÂëÈçÏ£º

% Exop4
clear up;
clc;

a=1/3;
q1=0.06;
q2=0.107;
x2=3.7+0.703*i;
flag=0;
func_main('3.txt',a,q1,q2,x2,flag);
¸´ÖƵ½command´°¿Ú¾Í¿ÉÒÔÔËÐС£
»Ø¸´´ËÂ¥

» ±¾Ìû¸½¼þ×ÊÔ´Áбí

  • »¶Ó­¼à¶½ºÍ·´À¡£ºÐ¡Ä¾³æ½öÌṩ½»Á÷ƽ̨£¬²»¶Ô¸ÃÄÚÈݸºÔð¡£
    ±¾ÄÚÈÝÓÉÓû§×ÔÖ÷·¢²¼£¬Èç¹ûÆäÄÚÈÝÉæ¼°µ½ÖªÊ¶²úȨÎÊÌ⣬ÆäÔðÈÎÔÚÓÚÓû§±¾ÈË£¬Èç¶Ô°æÈ¨ÓÐÒìÒ飬ÇëÁªÏµÓÊÏ䣺xiaomuchong@tal.com
  • ¸½¼þ 1 : func_main.m
  • 2012-05-27 11:38:14, 945 bytes
  • ¸½¼þ 2 : 3.txt
  • 2012-05-27 11:38:25, 3.1 K
  • ¸½¼þ 3 : Exop4.m
  • 2012-05-27 11:39:11, 119 bytes

» ²ÂÄãϲ»¶

» ±¾Ö÷ÌâÏà¹Ø¼ÛÖµÌùÍÆ¼ö£¬¶ÔÄúͬÑùÓаïÖú:

ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

csgt0

ÈÙÓþ°æÖ÷ (ÖøÃûдÊÖ)

²ÊÉ«¹Òͼ

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
FÀïµÄx2^aÓ¦¸Ãµã³Ë°É£¿ÓÐʲôÎÊÌâ³öʲô´íÒ²²»Ëµ£¬Óм¸¸öÄܰïÄã
showmethemoney
2Â¥2012-05-28 09:10:18
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

lijie169

Í­³æ (ÖøÃûдÊÖ)

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¡ï
¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
СÁõ8885: ½ð±Ò+1, ¡ïÓаïÖú 2012-05-29 10:09:49
plotyy(xf,a,xf,b);Õâ¾ä²»¶Ô°É£¡£¡£¡
3Â¥2012-05-28 13:11:52
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

СÁõ8885

ľ³æ (ÕýʽдÊÖ)

ÒýÓûØÌû:
2Â¥: Originally posted by csgt0 at 2012-05-28 09:10:18
FÀïµÄx2^aÓ¦¸Ãµã³Ë°É£¿ÓÐʲôÎÊÌâ³öʲô´íÒ²²»Ëµ£¬Óм¸¸öÄܰïÄã

Äú¿ÉÒÔ°ïÎÒ¿´¿´£¬¸ÄÕýµã³ËÖ®ºó£¬ÔËÐÐÖ®ºóÏÔʾÏÂÃæµÄ´íÎó£º
Error using trustnleqn (line 28)
Objective function is returning undefined values at initial point. FSOLVE cannot continue.

Error in fsolve (line 399)
    [x,FVAL,JACOB,EXITFLAG,OUTPUT,msgData]=...

Error in func_main (line 27)
F=fsolve(@(y2)func2(a,q2,x1,x2,y2),x0);
4Â¥2012-05-28 18:43:31
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

СÁõ8885

ľ³æ (ÕýʽдÊÖ)

ÒýÓûØÌû:
3Â¥: Originally posted by lijie169 at 2012-05-28 13:11:52
plotyy(xf,a,xf,b);Õâ¾ä²»¶Ô°É£¡£¡£¡

Õâ¾äÓï¾ä¾ÍÊÇ»­Ò»¸öË«yÖáµÄµÄͼ£¬ºÃÏñûÓÐ´í°¡¡£
function f4=func_main(name,a,q1,q2,X,flag)
% flag=0 represent complex permittivity
% flag=1 represent complex permeability
data=load(name);
xf=data(:,1);
x2=X*ones(length(data),1);
if (flag==0)
    y1=data(:,2)+data(:,3)*i;
   
elseif (flag==1)
    y1=data(:,4)+data(:,5)*i;
else
    disp('0 is complex perimittivity, 1 is complex permeability');
    return;
end

x11=func1(a,q1,y1,x2);  
%µ÷Óú¯Êýfunc1£¬Çó½âx1
%Hanai formula µÄÇó½â½á¹û %Çó½âµÄÊÇx1£¬Îª¾ø¶Ô½éµç³£Êý
x1=x11;
a=real(x1);
b=imag(x1);
c=[a,b];
plotyy(xf,a,xf,b);

x0=zeros(length(data),1);
F=fsolve(@(y2)func2(a,q2,x1,x2,y2),x0);
%µ÷ÓÃǰÊöfunc1ËùÇóµÃµÄx1£¬´úÈ뺯Êýfunc2
%Çó½â³¬Ô½·½³ÌµÄy2Öµ¡£
f4=F;
r = [real(f4), imag(f4)];


save('data1.txt', 'c', '-ascii');
save('data2.txt', 'r', '-ascii');

function x1=func1(a,q1,y1,x2)
x1=(q1.*x2-x2+y1.*(x2./y1).^a)./(q1+(x2./y1).^a-1);
%Çó½âx1

function F=func2(a,q2,x1,x2,y2)
F=(((1-q2)*(x2-x1))./(x2.^a)).*(y2.^a)-y2+x1;
%Çó½ây2

ÎÒ°Ñ plotyy(xf,a,xf,b); ÕâÒ»Óï¾äÌáµ½Ç°ÃæÈ¥ÊÇ¿ÉÒÔÖ´Ðе쬻¹»­³öÁËͼ¡£ÔËÐÐÖ®ºóÌáʾÎÒÎÊÌâ³öÔÚ fsolve ÄǸöÓï¾ä¡£
5Â¥2012-05-28 18:46:10
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

csgt0

ÈÙÓþ°æÖ÷ (ÖøÃûдÊÖ)

²ÊÉ«¹Òͼ

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï
СÁõ8885: ½ð±Ò+29, ¡ï¡ï¡ï¡ï¡ï×î¼Ñ´ð°¸, ¹ûÈ»ÊÇÅ£ÈË£¬´ó²Å¡£ 2012-05-29 10:09:20
x0=zeros(length(data),1);
¸Ä³Éx0=ones(length(data),1);
Èç¹ûx0=0£¬y2=0,F2¾ÍÎÞÇî´óÁËËùÒÔ±¨´í

» ±¾ÌûÒÑ»ñµÃµÄºì»¨£¨×îÐÂ10¶ä£©

showmethemoney
6Â¥2012-05-29 09:21:27
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

СÁõ8885

ľ³æ (ÕýʽдÊÖ)

ËÍÏÊ»¨Ò»¶ä
ÒýÓûØÌû:
6Â¥: Originally posted by csgt0 at 2012-05-29 09:21:27
x0=zeros(length(data),1);
¸Ä³Éx0=ones(length(data),1);
Èç¹ûx0=0£¬y2=0,F2¾ÍÎÞÇî´óÁËËùÒÔ±¨´í

¹ûȻϬÀû£¬±»ÄãµãÖÐÁË¡£ÎÊÌâ½â¾öÁË£¬Ð»Ð»£¡
7Â¥2012-05-29 10:05:46
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ СÁõ8885 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] Ò»Ö¾Ô¸Ìì½ò´óѧ»¯Ñ§¹¤ÒÕרҵ£¨081702£©315·ÖÇóµ÷¼Á +12 yangfz 2026-03-17 12/600 2026-03-21 03:30 by JourneyLucky
[¿¼ÑÐ] ²ÄÁϹ¤³Ì£¨×¨£©Ò»Ö¾Ô¸985 ³õÊÔ335Çóµ÷¼Á +3 hiloiy 2026-03-17 4/200 2026-03-21 03:04 by JourneyLucky
[¿¼ÑÐ] ¡¾¿¼Ñе÷¼Á¡¿»¯Ñ§×¨Òµ 281·Ö£¬Ò»Ö¾Ô¸ËÄ´¨´óѧ£¬³ÏÐÄÇóµ÷¼Á +8 ³Ô³Ô³Ô²ÅÓÐÒâÒå 2026-03-19 8/400 2026-03-21 00:49 by Áõ¹úÉ­
[¿¼ÑÐ] Ò»Ö¾Ô¸ÖØÇì´óѧ085700×ÊÔ´Óë»·¾³×¨Ë¶£¬×Ü·Ö308Çóµ÷¼Á +3 īīĮ 2026-03-18 3/150 2026-03-21 00:39 by JourneyLucky
[¿¼ÑÐ] 22408 344·Ö Çóµ÷¼Á Ò»Ö¾Ô¸ »ªµç¼ÆËã»ú¼¼Êõ +4 solanXXX 2026-03-20 4/200 2026-03-20 23:49 by alg094825
[¿¼ÑÐ] ¿¼Ñе÷¼ÁÇóÑ§Ð£ÍÆ¼ö +3 ²®ÀÖ29 2026-03-18 5/250 2026-03-20 22:59 by JourneyLucky
[¿¼ÑÐ] 085600²ÄÁÏÓ뻯¹¤ +8 °²È«Éϰ¶£¡ 2026-03-16 8/400 2026-03-20 22:13 by luoyongfeng
[¿¼ÑÐ] 290Çóµ÷¼Á +7 ^O^Ø¿ 2026-03-19 7/350 2026-03-20 21:43 by JourneyLucky
[¿¼ÑÐ] ±±¿Æ281ѧ˶²ÄÁÏÇóµ÷¼Á +5 tcxiaoxx 2026-03-20 5/250 2026-03-20 21:35 by laoshidan
[¿¼ÑÐ] ²ÄÁÏѧÇóµ÷¼Á +4 Stella_Yao 2026-03-20 4/200 2026-03-20 20:28 by ms629
[¿¼ÑÐ] ²ÄÁÏÓ뻯¹¤×¨Ë¶µ÷¼Á +7 heming3743 2026-03-16 7/350 2026-03-20 19:31 by zhukairuo
[¿¼ÑÐ] Ò»Ö¾Ô¸ÄÏÀí¹¤085701»·¾³302Çóµ÷¼ÁԺУ +3 ¿ûè÷ÎÀ¶Ó 2026-03-20 3/150 2026-03-20 19:28 by zhukairuo
[¿¼ÑÐ] »·¾³¹¤³Ìµ÷¼Á +9 ´ó¿Édigkids 2026-03-16 9/450 2026-03-20 17:38 by ×íÔÚ·çÀï
[¿¼ÑÐ] ¹¤¿Æ²ÄÁÏ085601 279Çóµ÷¼Á +7 À§ÓÚÐdz¿ 2026-03-17 9/450 2026-03-20 17:38 by ÎÞи¿É»÷111
[¿¼ÑÐ] 346Çóµ÷¼Á[0856] +3 WayneLim327 2026-03-16 6/300 2026-03-19 11:21 by WayneLim327
[¿¼ÑÐ] 0817µ÷¼Á +3 ûÓдð°¸_ 2026-03-14 3/150 2026-03-19 09:51 by Xu de nuo
[¿¼ÑÐ] ²ÄÁÏ£¬·ÄÖ¯£¬ÉúÎ0856¡¢0710£©£¬»¯Ñ§ÕÐÉúÀ² +3 Eember. 2026-03-17 9/450 2026-03-18 10:28 by Eember.
[¿¼ÑÐ] ÉúÎïѧ071000 329·ÖÇóµ÷¼Á +3 ÎÒ°®ÉúÎïÉúÎﰮΠ2026-03-17 3/150 2026-03-18 10:12 by macy2011
[¿¼ÑÐ] Öпƴó²ÄÁÏÓ뻯¹¤319Çóµ÷¼Á +3 ÃÏöβÄÁÏ 2026-03-14 3/150 2026-03-14 20:10 by ms629
[¿¼ÑÐ] 289Çóµ÷¼Á +4 ÕâôÃû×ÖÕ¦Ñù 2026-03-14 6/300 2026-03-14 18:58 by userper
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û