24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 791  |  回复: 4

jiasen1980

金虫 (正式写手)

[交流] 【求助】那位高手帮看下MATLAB程序出错了

%FWT on the NLS equation i*du/dt+alpha*d^2u/dx^2+nu*|u|^2*u=0
%x=linspace(-3,3,1000);u=exp(2*x.^2);[c,L]=wavedec(u,3,'sym6');A=wrcoef('a',c,L,'sym6',3);
%plot(x,u,'x',x,A,'r')
%-----Claculate the wavelet-------
xmax=16;
level=3;
alpha=1/2;
nu=1;
deltat=5*10^(-5);
maxtime=2;
iter=3;
wav='sym6';
[phi,psi,xval]=wavefun(wav,iter);
hval=xval(2)-xval(1);
MX=max(xval);
s=1;
% mm=0;
% jump=10^(s+1);
flag=1;
for t=0:deltat:maxtime
if flag==1
flag=0;
thresh=2^(level-3)*10^-5;
phin=2^(level/2)*phi;
psin=2^(level/2)*psi;
lenphi=length(phin);
shift=floor(lenphi/MX);
N=xmax*2^level-(MX-1);
lenPHI=(N-1)*shift+lenphi;
x=linspace(-xmax/2,xmax/2,lenPHI);
h=x(2)-x(1);
%--------------Clculate the initial approximation of u--------------
if t==0
ua=3*sech(x);
end
t=0;
for L=1:N
aold(1,L)=h*ua((L-1)*shift+1L-1)*shift+lenphi)*phin';
end
for L=1:N
b(1,L)=h*ua((L-1)*shift+1L-1)*shift+lenphi)*psin';
end
u0=zeros(1,lenPHI);
for L=1:N
u0(1,(L-1)*shift+1L-1)*shift+lenphi)=u0(1,(L-1)*shift+1L-1)*shift+lenphi)+aold(1,L)*phin;
end
figure
plot(x,ua,'k',x,u0,'r');
title(strcat('xmax=',num2str(xmax),',alpha=',num2str(alpha),',\nu=',num2str(nu),',maxtime=',num2str(maxtime),',deltat=',num2str(deltat),',level=',num2str(level),',iter=',num2str(iter),',time=',num2str(t)));
%----Calculate KM Matrix for sym6
load sym6KMburg3;
for L=1:N
for K=1:N
if abs(L-K) KM(L,K)=sym6KMburg3(K-L+MX)*2^(2*level);
end
end
end
%-------------
load sym6LambdaNLS3;
end
% U=zeros(floor(maxtime/(jump*deltat))+1,lenPHI);
%----Calculate C Matrix-----------------
C=zeros(N,N);
for L=1:N
for K=1:N
if abs(L-K) for m =1:N
if abs(m-K) for n=1:N
if abs(n-K) C(L,K)=C(L,K)+aold(1,n)*2^(level)*sym6LambdaNLS3(KL+MX,m-L+MX,n-L+MX)*conj(aold(1,m));
end
end
end
end
end
end
end
% % for L=1:N
% % for K=1:N
% % if abs(L-K) % % Mat(L,K)=deltat*(nu*C(L,K)+alpha*sym6KMburg3(KL+MX)*2^(2*level));
% % end
% % end
% % end
% %a=a+i*a*Mat;
anon=aold+i*deltat*aold*nu*C;
alin=anon+i*deltat*anon*alpha*KM;
anew=alin;
aold=anew;
if max(abs(aold))>50
u=zeros(1,lenPHI);
for L=1:N
u(1,(L-1)*shift+1L-1)*shift+lenphi)=u(1,(L-1)*shift+1L-1)*shift+lenphi)+abs(aold(1,L))*phi;
end
figure
plot(x,u0,'r',x,u,'k');
title(strcat('xmax=',num2str(xmax),',alpha=',num2str(alpha),',\nu=',num2str(nu),',maxtime=',num2str(maxtime),',deltat=',num2str(deltat),',level=',num2str(level),',iter=',num2str(iter),',time=',num2str(t)));
break;
end
u=zeros(1,lenPHI);
for L=1:N
u(1,(L-1)*shift+1L-1)*shift+lenphi)=u(1,(L-1)*shift+1L-1)*shift+lenphi)+abs(aold(1,L))*phin;
end
for L=1:N
b(1,L)=h*u((L-1)*shift+1L-1)*shift+lenphi)*psin';
end
if max(abs(b))>thresh
max(abs(b));
level=level+1;
flag=1;
ut=interp(u,2);
ua=ut(1:length(ut)-1);
% a=interp(a,2);
end
% if t == (mm*jump*deltat)
% u=zeros(1,lenPHI);
% for L=1:N
% u(1,(L-1)*shift+1L-1)*shift+lenphi)=u(1,(L-1)*shift+1L-1)*shift+lenphi)+abs(aold(1,L))*phin;
% end
% mm=mm+1;
% U(mm,=u;
% end
if t==deltat*10^(s+1)|t==deltat*10^(s+2)|t==deltat*10^(s+3)|t==deltat*10^(s+4)|t==0.5|t==0.75|t==1.5|t==1.75|t==2u=zeros(1,lenPHI);
for L=1:N
u(1,(L-1)*shift+1L-1)*shift+lenphi)=u(1,(L-1)*shift+1L-1)*shift+lenphi)+abs(aold(1,L))*phin;
end
figure
plot(x,u0,'r',x,u,'k');
title(strcat('xmax=',num2str(xmax),',alpha=',num2str(alpha),',\nu=',num2str(nu),',maxtime=',num2str(maxtime),',deltat=',num2str(deltat),',level=',num2str(level),',iter=',num2str(iter),',time=',num2str(t)));
end
end
% figure
% S=size(U);
% % tp=[0:1:S(1)-1];
% tp=linspace(0,maxtime,S(1));
% [X,T]=meshgrid(x,tp);
% mesh(X,T,U);
%
title(strcat('xmax=',num2str(xmax),',alpha=',num2str(alpha),',\nu=',num2str(nu),',maxtime=',num2str(maxtime),',deltat=',num2str(deltat),',level=',num2str(level),',iter=',num2str(iter),',time=',num2str(t)));
??? Error using ==> load
Unable to read file sym6KMburg3: No such file or directory.
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lixuke2005

铁杆木虫 (著名写手)

jiasen1980(金币+2):这就是原文件 只是那个字符" :" 被那脸的图标自动取代了 2010-09-08 22:29:34
你最好给出原文的m文件
bla
2楼2010-09-08 20:32:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zyj8119

木虫 (著名写手)

jiasen1980(金币+1): 2010-09-09 14:11:53
可以使用代码格式。。
好好学习,天天向上。
3楼2010-09-09 09:41:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xiegangmai

版主 (职业作家)

我没头衔

优秀版主优秀版主优秀版主


jiasen1980(金币+2): 2010-09-09 14:12:28
ctgu_zheng(金币+1):辛苦了,鼓励应助。。。 2010-09-09 16:59:36
jiasen1980(金币+3): 2010-09-12 17:45:06
引用回帖:
Originally posted by jiasen1980 at 2010-09-08 17:23:33:
%FWT on the NLS equation i*du/dt+alpha*d^2u/dx^2+nu*|u|^2*u=0
%x=linspace(-3,3,1000);u=exp(2*x.^2);[c,L]=wavedec(u,3,'sym6');A=wrcoef('a',c,L,'sym6',3);
%plot(x,u,'x',x,A,'r')
%-----Claculate th ...

错误提示已经给的很明确了:
Unable to read file sym6KMburg3: No such file or directory.
没找到sym6KMburg3文件

确认一下这是什么文件,如果有该文件,文件路径是什么?要么复制到当前工作目录下,或设置以下相应路径。
明德厚学、求是创新
4楼2010-09-09 10:33:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

yqx1985

木虫 (著名写手)

云中仙

jiasen1980(金币+2): 2010-09-12 17:44:59
楼上正解
人面不知何时去,桃花依旧笑春风
5楼2010-09-09 17:46:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 jiasen1980 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 327求调剂 +4 拾光任染 2026-04-05 4/200 2026-04-05 20:16 by 南航~万老师
[考研] 070300化学学硕311分求调剂 +8 梁富贵险中求 2026-04-04 8/400 2026-04-05 18:01 by 猪会飞
[考研] 一志愿上海海洋大学083200食品学硕,求调剂,接受其他专业083200 +4 what张 2026-04-04 5/250 2026-04-05 14:07 by chw1980_0
[考研] 271分求调剂学校 +12 zph158488! 2026-04-02 13/650 2026-04-05 10:13 by lqwchd
[考研] 085602调剂 初试总分335 +12 19123253302 2026-04-04 12/600 2026-04-05 08:08 by 544594351
[考研] 323分(计算机视觉和大模型项目)能直接上手 +3 chaoxiicy 2026-04-01 3/150 2026-04-05 00:50 by chongya
[考研] 材料与化工306分找调剂 +23 沧海轻舟e 2026-04-02 27/1350 2026-04-04 21:52 by laoshidan
[考研] 342求调剂 +3 Liang7111 2026-04-04 5/250 2026-04-04 19:47 by dongzh2009
[考研] 334求调剂 +8 曾仰之 2026-04-03 8/400 2026-04-04 11:16 by w_xuqing
[考研] 一志愿南昌大学324求调剂 +9 hanamiko 2026-03-30 9/450 2026-04-04 11:04 by 猪会飞
[考研] 268求调剂 +8 你好tg 2026-04-03 9/450 2026-04-04 05:08 by gswylq
[考研] 一志愿双非085502,267分,过四级求调剂 +3 再忙也要吃饭啊 2026-04-03 3/150 2026-04-04 05:03 by gswylq
[考研] 考研调剂 +5 小sun要好运 2026-04-03 5/250 2026-04-03 21:43 by 啵啵啵0119
[考研] 五邑大学土木工程招调剂生2026 +3 wyutj 2026-03-31 4/200 2026-04-03 18:21 by zengxj_7201
[考研] 282求调剂 不挑专业 求收留 +7 Yam. 2026-03-30 8/400 2026-04-03 14:12 by zhangdingwa
[考研] 一志愿深大085601材料工程专业(专硕)300分可以调剂去哪 +8 10160315 2026-04-02 8/400 2026-04-03 09:36 by hypershenger
[考研] 295求调剂 +7 愿旅途永远坦然 2026-04-02 7/350 2026-04-03 08:22 by fangshan711
[考研] 农学考研求调剂 +3 dkdkxm 2026-04-01 3/150 2026-04-02 16:04 by wangjagri
[考研] 08生物与医药专硕初试346找调剂 +6 dianeeee 2026-04-01 7/350 2026-04-02 08:23 by guoweigw
[考研] 江苏苏北高校诚邀调剂同学 +3 zzll406 2026-03-31 3/150 2026-03-31 16:54 by 及时行乐fan
信息提示
请填处理意见