| ²é¿´: 2437 | »Ø¸´: 2 | ||
·Æì³Ð³æ (³õÈëÎÄ̳)
|
[ÇóÖú]
ÇómatlabÖÐ diff Difference order N must be a positive integer scalarʲôÒâ˼ ÒÑÓÐ1È˲ÎÓë
|
|
ÎÒÊÇmatlabÐÂÊÖ£¬²»ÖªµÀ³ÌÐòÖÐΪʲô»á³öÏÖ??? Error using ==> diff Difference order N must be a positive integer scalar. Error in ==> chern at 90 phpx2=diff(H2,'x'); ÎÒÖ»ÊǰѵÚÒ»¸ö³ÌÐòÖеÄH±äÁËһϣ¬¾ÍÓдíÎ󣬿ÉÊÇÈç¹û°ÑÕâ2¶Î·Öµ½2¸ömÎļþÀ¾ÍľÓÐÎÊÌ⣬զ»ØÊÂѽ¡£´óÉñ°ïæѽ£¬³ÌÐòÈçÏ syms x y a=1.0; t=1; t1=0.1*t; u0=0.6*sqrt(3)*t; u2=0.6*sqrt(3)*t; f=2*cos(x*a/2)*cos(sqrt(3)*a*y/2)-2*i*cos(sqrt(3)*a*y/2)*sin(a*x/2)+cos(x*a)+i*sin(x*a); g=-i*(2*i*sin(sqrt(3)*a*y)-4*i*sin(sqrt(3)*a*y/2+3*a*x/2)); H=[u0/2+t1*g-u2/2,2*t*f;2*t*conj(f),-u0/2-t1*g+u2/2]; phpx=diff(H,'x'); phpy=diff(H,'y'); h=6.63*10^(-34);%´ËΪÆÕÀʿ˳£Êý hall=0; for kx = -2*pi/(3*a) : 4*pi/(30*a) : 2*pi/(3*a) for ky = -4*pi*sqrt(3)/(9*a) : 8*pi*sqrt(3)/(90*a) : 4*pi*sqrt(3)/(9*a) if -2*pi/(3*a) <= kx <= 0 && (-sqrt(3)*kx/3-4*pi*sqrt(3)/(9*a)) <= ky <=(sqrt(3)*kx/3+4*pi*sqrt(3)/(9*a)) % f=exp(-i*((kx*a/2)+sqrt(3)*ky*a/2))+ exp(-i*((kx*a/2)-sqrt(3)*ky*a/2))+exp(-i*(-kx*a)) ; %g1=exp(i*(ky*sqrt(3)*a))-exp(i*(-kx*3*a/2+ky*sqrt(3)*a/2))+exp(i*(-kx*3*a/2-ky*sqrt(3)*a/2)); %g2=-exp(i*(-ky*sqrt(3)*a))+exp(i*(kx*3*a /2-ky*sqrt(3)*a/2))-exp(i*(kx*3*a/2+ky*sqrt(3)*a/2)); %g=-i*(g1+g2); f=2*cos(kx*a/2)*cos(sqrt(3)*a*ky/2)-2*i*cos(sqrt(3)*a*ky/2)*sin(a*kx/2)+cos(kx*a)+i*sin(kx*a); g=-i*(2*i*sin(sqrt(3)*a*ky)-4*i*sin(sqrt(3)*a*ky/2+3*a*kx/2)); H=[u0/2+t1*g-u2/2,2*t*f;2*t*conj(f),-u0/2-t1*g+u2/2]; [P,E]=eig(H); mk=[P(1,1);P(2,1)]; %ÓÃeigÇóµÃµÄ±¾Õ÷ʸºÍ±¾Õ÷Öµ²»Êǰ´´ÓСµ½´óµÄ˳ÐòÅÅÁÐµÄ nk=[P(1,2);P(2,2)]; Em=E(1,1); En=E(2,2); vx=subs(phpx,{x,y},{kx,ky}); vy=subs(phpy,{x,y},{kx,ky}); s=i*exp(2)*9*a^2/(4*sqrt(3)*pi*h);%´ËΪϵÊý if Em<En ha=s*((mk'*vx*nk)*(nk'*vy*mk)-(mk'*vy*nk)*(nk'*vx*mk)) /(Em-En)^2; else ha=s*((nk'*vx*mk)*(mk'*vy*nk)-(nk'*vy*mk)*(mk'*vx*nk)) /(En-Em)^2; end hall=hall+ha; end if 0 <= kx <= 2*pi/(3*a) && (sqrt(3)*kx/3-4*pi*sqrt(3)/(9*a)) <= ky <=(-sqrt(3)*kx/3+4*pi*sqrt(3)/(9*a)) %f=exp(-i*((kx*a/2)+sqrt(3)*ky*a/2))+ exp(-i*((kx*a/2)-sqrt(3)*ky*a/2))+exp(-i*(-kx*a)) ; %g1=exp(i*(ky*sqrt(3)*a))-exp(i*(-kx*3*a/2+ky*sqrt(3)*a/2))+exp(i*(-kx*3*a/2-ky*sqrt(3)*a/2)); %g2=-exp(i*(-ky*sqrt(3)*a))+exp(i*(kx*3*a /2-ky*sqrt(3)*a/2))-exp(i*(kx*3*a/2+ky*sqrt(3)*a/2)); %g=-i*(g1+g2); f=2*cos(kx*a/2)*cos(sqrt(3)*a*ky/2)-2*i*cos(sqrt(3)*a*ky/2)*sin(a*kx/2)+cos(kx*a)+i*sin(kx*a); g=-i*(2*i*sin(sqrt(3)*a*ky)-4*i*sin(sqrt(3)*a*ky/2+3*a*kx/2)); H=[u0/2+t1*g-u2/2,2*t*f;2*t*conj(f),-u0/2-t1*g+u2/2]; [P,E]=eig(H); mk=[P(1,1);P(2,1)]; nk=[P(1,2);P(2,2)]; Em=E(1,1); En=E(2,2); vx=subs(phpx,{x,y},{kx,ky}); vy=subs(phpy,{x,y},{kx,ky}); s=i*exp(2)*9*a^2/(4*sqrt(3)*pi*h); if Em<En ha=s*((mk'*vx*nk)*(nk'*vy*mk)-(mk'*vy*nk)*(nk'*vx*mk)) /(Em-En)^2; else ha=s*((nk'*vx*mk)*(mk'*vy*nk)-(nk'*vy*mk)*(mk'*vx*nk)) /(En-Em)^2; end hall=hall+ha; end end end c1=hall*h/(2*pi*exp(2));%µÚÒ»¶Î H2=[u0/2-t1*g+u2/2,2*t*f;2*t*conj(f),-u0/2+t1*g-u2/2]; phpx2=diff(H2,'x'); phpy2=diff(H2,'y'); hall2=0; for kx = -2*pi/(3*a) : 4*pi/(30*a) : 2*pi/(3*a) for ky = -4*pi*sqrt(3)/(9*a) : 8*pi*sqrt(3)/(90*a) : 4*pi*sqrt(3)/(9*a) if -2*pi/(3*a) <= kx <= 0 && (-sqrt(3)*kx/3-4*pi*sqrt(3)/(9*a)) <= ky <=(sqrt(3)*kx/3+4*pi*sqrt(3)/(9*a)) % f=exp(-i*((kx*a/2)+sqrt(3)*ky*a/2))+ exp(-i*((kx*a/2)-sqrt(3)*ky*a/2))+exp(-i*(-kx*a)) ; %g1=exp(i*(ky*sqrt(3)*a))-exp(i*(-kx*3*a/2+ky*sqrt(3)*a/2))+exp(i*(-kx*3*a/2-ky*sqrt(3)*a/2)); %g2=-exp(i*(-ky*sqrt(3)*a))+exp(i*(kx*3*a /2-ky*sqrt(3)*a/2))-exp(i*(kx*3*a/2+ky*sqrt(3)*a/2)); %g=-i*(g1+g2); f=2*cos(kx*a/2)*cos(sqrt(3)*a*ky/2)-2*i*cos(sqrt(3)*a*ky/2)*sin(a*kx/2)+cos(kx*a)+i*sin(kx*a); g=-i*(2*i*sin(sqrt(3)*a*ky)-4*i*sin(sqrt(3)*a*ky/2+3*a*kx/2)); H2=[u0/2-t1*g+u2/2,2*t*f;2*t*conj(f),-u0/2+t1*g-u2/2]; [P,E]=eig(H2); mk=[P(1,1);P(2,1)]; %ÓÃeigÇóµÃµÄ±¾Õ÷ʸºÍ±¾Õ÷Öµ²»Êǰ´´ÓСµ½´óµÄ˳ÐòÅÅÁÐµÄ nk=[P(1,2);P(2,2)]; Em=E(1,1); En=E(2,2); vx2=subs(phpx2,{x,y},{kx,ky}); vy2=subs(phpy2,{x,y},{kx,ky}); s=i*exp(2)*9*a^2/(4*sqrt(3)*pi*h);%´ËΪϵÊý if Em<En ha=s*((mk'*vxb*nk)*(nk'*vyb*mk)-(mk'*vyb*nk)*(nk'*vxb*mk)) /(Em-En)^2; else ha=s*((nk'*vxb*mk)*(mk'*vyb*nk)-(nk'*vyb*mk)*(mk'*vxb*nk)) /(En-Em)^2; end hall2=hallb+ha; end if 0 <= kx <= 2*pi/(3*a) && (sqrt(3)*kx/3-4*pi*sqrt(3)/(9*a)) <= ky <=(-sqrt(3)*kx/3+4*pi*sqrt(3)/(9*a)) %f=exp(-i*((kx*a/2)+sqrt(3)*ky*a/2))+ exp(-i*((kx*a/2)-sqrt(3)*ky*a/2))+exp(-i*(-kx*a)) ; %g1=exp(i*(ky*sqrt(3)*a))-exp(i*(-kx*3*a/2+ky*sqrt(3)*a/2))+exp(i*(-kx*3*a/2-ky*sqrt(3)*a/2)); %g2=-exp(i*(-ky*sqrt(3)*a))+exp(i*(kx*3*a /2-ky*sqrt(3)*a/2))-exp(i*(kx*3*a/2+ky*sqrt(3)*a/2)); %g=-i*(g1+g2); f=2*cos(kx*a/2)*cos(sqrt(3)*a*ky/2)-2*i*cos(sqrt(3)*a*ky/2)*sin(a*kx/2)+cos(kx*a)+i*sin(kx*a); g=-i*(2*i*sin(sqrt(3)*a*ky)-4*i*sin(sqrt(3)*a*ky/2+3*a*kx/2)); H2=[u0/2-t1*g+u2/2,2*t*f;2*t*conj(f),-u0/2+t1*g-u2/2]; [P,E]=eig(H2); mk=[P(1,1);P(2,1)]; nk=[P(1,2);P(2,2)]; Em=E(1,1); En=E(2,2); vx2=subs(phpx2,{x,y},{kx,ky}); vy2=subs(phpy2,{x,y},{kx,ky}); s=i*exp(2)*9*a^2/(4*sqrt(3)*pi*h); if Em<En ha=s*((mk'*vxb*nk)*(nk'*vyb*mk)-(mk'*vyb*nk)*(nk'*vxb*mk)) /(Em-En)^2; else ha=s*((nk'*vxb*mk)*(mk'*vyb*nk)-(nk'*vyb*mk)*(mk'*vxb*nk)) /(En-Em)^2; end hall2=hall2+ha; end end end c2=hallb*h/(2*pi*exp(2)); c=c1+c2;%µÚ¶þ¶Î |
» ²ÂÄãϲ»¶
0854µç×ÓÐÅÏ¢Çóµ÷¼Á
ÒѾÓÐ7È˻ظ´
0854È˹¤ÖÇÄÜ·½ÏòÕÐÊÕµ÷¼Á
ÒѾÓÐ3È˻ظ´
µ÷¼Á
ÒѾÓÐ4È˻ظ´
Ò»Ö¾Ô¸±±»¯315 Çóµ÷¼Á
ÒѾÓÐ3È˻ظ´
ÓлúºÏ³ÉÇóÖú
ÒѾÓÐ5È˻ظ´
²ÄÁÏѧ˶333Çóµ÷¼Á
ÒѾÓÐ3È˻ظ´
289Çóµ÷¼Á
ÒѾÓÐ7È˻ظ´
ÊÕ08µ÷¼ÁÉú
ÒѾÓÐ6È˻ظ´
²ÄÁÏר˶ÕÒµ÷¼Á
ÒѾÓÐ5È˻ظ´
085602 289·ÖÇóµ÷¼Á
ÒѾÓÐ5È˻ظ´
zhchh008
½ð³æ (ÕýʽдÊÖ)
- Ó¦Öú: 13 (СѧÉú)
- ½ð±Ò: 1602.2
- É¢½ð: 871
- ºì»¨: 13
- Ìû×Ó: 835
- ÔÚÏß: 202.7Сʱ
- ³æºÅ: 99456
- ×¢²á: 2005-11-11
- ÐÔ±ð: GG
- רҵ: ×ÊÔ´»¯¹¤
2Â¥2014-10-30 19:53:58
·Æì³
гæ (³õÈëÎÄ̳)
- Ó¦Öú: 0 (Ó×¶ùÔ°)
- ½ð±Ò: 21
- Ìû×Ó: 2
- ÔÚÏß: 1.5Сʱ
- ³æºÅ: 3247358
- ×¢²á: 2014-06-01
- רҵ: Äý¾Û̬ÎïÐÔ II £ºµç×ӽṹ
3Â¥2014-11-04 16:03:16













»Ø¸´´ËÂ¥