24小时热门版块排行榜    

查看: 612  |  回复: 3
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

shuishui1988

铜虫 (小有名气)

[求助] Matlab 程序求助

本人初学Matlab,最近在研究小波变换,下面的程序得到的小波变换的波形非常不好,不知道问题出在哪里,希望高手解答,金币奉上~
clear;
close all;
clc

m=10^(-17);  
k=10;      
E0=1*1.60217646*10^(-19);
%r=2*sqrt(k*m);
r=10^(-3);%6.32*10^(-4);
beta=30*pi/180;
vm=400;
ax=4;
ay=7;
jiange=0.002;
tend=75;
x0=[0 0];
[t x]=ode45(@ode1DMoS2,[0:jiange:tend],x0,[],m,k,E0,r,vm,ax,ay,jiange,beta);
xx=x(:,1);
vx=x(:,2);
counter=1;
for i=1:length(xx)

          b(counter)=xx(i);
          f(1,counter)=k*(vm*t(i)*jiange-b(counter))*0.1;
          f(2,counter)=vm*t(i)*jiange*0.1;
          counter=counter+1;
end
figure;
plot(f(2,,f(1,);
figure;
[c,l]=wavedec(f(1,,5,'db9');
a4=wrcoef('a',c,l,'db9',5);
a3=wrcoef('d',c,l,'db9',4);
a2=wrcoef('d',c,l,'db9',3);
a1=wrcoef('d',c,l,'db9',2);
d1=wrcoef('d',c,l,'db9',1);
figure(2);
subplot(5,1,1);
plot(a4,'k-','LineWidth',2);
ylabel('a4');
subplot(5,1,2);
plot(a3,'k-','LineWidth',2);
ylabel('a3');
subplot(5,1,3);
plot(a2,'k-','LineWidth',2);
ylabel('2');
subplot(5,1,4);
plot(a1,'k-','LineWidth',2);
ylabel('a1');
subplot(5,1,5);
plot(d1,'k-','LineWidth',2);
ylabel('d1');
xlabel('时间 t/s');
subplot(6,1,1);plot(f(1,);

Matlab 程序求助
小波变换.jpg
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

shuishui1988

铜虫 (小有名气)

笑脸实际是程序“:)”,希望高手帮帮忙啊!
3楼2015-05-29 14:29:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 4 个回答

shuishui1988

铜虫 (小有名气)

程序如下:
clear;
close all;
clc

m=10^(-17);  
k=10;      
E0=1*1.60217646*10^(-19);
%r=2*sqrt(k*m);
r=10^(-3);%6.32*10^(-4);
beta=20*pi/180;
vm=400;
ax=5.7;
ay=9.88;
jiange=0.002;
tend=75;
x0=[0 0];
[t x]=ode45(@ode1DMoS2,[0:jiange:tend],x0,[],m,k,E0,r,vm,ax,ay,jiange,beta);
xx=x(:,1);
vx=x(:,2);
counter=1;
for i=1:length(xx)

          b(counter)=xx(i);
          f(1,counter)=k*(vm*t(i)*jiange-b(counter))*0.1;
          f(2,counter)=vm*t(i)*jiange*0.1;
          counter=counter+1;
end
figure;
plot(f(2,,f(1,);
figure;
[c,l]=wavedec(f(1,,5,'db9');
a4=wrcoef('a',c,l,'db9',5);
a3=wrcoef('d',c,l,'db9',4);
a2=wrcoef('d',c,l,'db9',3);
a1=wrcoef('d',c,l,'db9',2);
d1=wrcoef('d',c,l,'db9',1);
figure(2);
subplot(5,1,1);
plot(a4,'k-','LineWidth',2);
ylabel('a4');
subplot(5,1,2);
plot(a3,'k-','LineWidth',2);
ylabel('a3');
subplot(5,1,3);
plot(a2,'k-','LineWidth',2);
ylabel('2');
subplot(5,1,4);
plot(a1,'k-','LineWidth',2);
ylabel('a1');
subplot(5,1,5);
plot(d1,'k-','LineWidth',2);
ylabel('d1');
xlabel('时间 t/s');
subplot(6,1,1);plot(f(1,);
%figure;plot(t,f(1,);
%figure;plot(t,b);
%figure;plot(t,f(2,);
%figure;plot(t);
2楼2015-05-29 14:27:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

shuishui1988

铜虫 (小有名气)

求助各位,帮帮忙啊~
4楼2015-06-01 09:54:35
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[硕博家园] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 wsYGJnURYvm6 2026-08-31 3/150 2026-09-01 01:40 by o3EMxHUAQDtS
[考博] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 EZ67DG6CvcKL 2026-08-31 4/200 2026-09-01 01:30 by o3EMxHUAQDtS
[基金申请] 怎么看青基中了没有啊 +6 叶九微 2026-08-26 6/300 2026-08-31 23:54 by yudaoqian88
[找工作] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 EZ67DG6CvcKL 2026-08-31 3/150 2026-08-31 22:23 by o3EMxHUAQDtS
[基金申请] 投票:  有多少人是今天查系统知道结果的? +17 爱看书的可乐 2026-08-26 19/950 2026-08-31 21:30 by xiangy672
[基金申请] 基金未中,这种答复是模板吗? +6 zhaosm1982 2026-08-27 7/350 2026-08-31 21:18 by qdxxmc
[基金申请] 面上意见出来了 +12 黄鸟于飞Chao 2026-08-29 23/1150 2026-08-31 18:57 by 黄鸟于飞Chao
[文学芳草园] 梦想 +5 myrtle 2026-08-26 5/250 2026-08-31 14:40 by hahaboy
[基金申请] 29号明天会评吗 +4 笨笨唐 2026-08-28 4/200 2026-08-31 09:30 by huixian257
[基金申请] 基金不中,共勉 +12 eulota 2026-08-26 12/600 2026-08-31 08:42 by ZJTJZ
[基金申请] 为什么到现在没收到通知? +5 tannykie 2026-08-29 5/250 2026-08-30 21:05 by purplejack
[基金申请] 有没有仍没收到信息的 +7 德尚中行 2026-08-27 8/400 2026-08-30 20:52 by purplejack
[基金申请] 为什么资助数各大高校都创新高,自己申请怎么就这么难 +12 Kittylucky 2026-08-27 13/650 2026-08-29 00:04 by superceng
[基金申请] 基金系统什么内容也没有 30+4 winsaint 2026-08-27 9/450 2026-08-28 11:06 by maolC
[基金申请] 面上合作单位盖章 +5 ssyjh 2026-08-27 5/250 2026-08-27 20:50 by gdfollow
[基金申请] 看板上这么多中的,有点像50人群里49个人都是骗子的那种感觉…… +5 a089 2026-08-26 6/300 2026-08-27 14:05 by jonewore
[基金申请] 为什么 国际(地区)合作与交流项目 没有放榜? 10+3 majunge000 2026-08-26 11/550 2026-08-27 08:42 by 北京莱茵编辑
[基金申请] 我不理解! +15 Edward_pc 2026-08-26 23/1150 2026-08-26 20:34 by zzuzxg
[基金申请] 2026年8月25日国自然放榜前突然收到列入评审专家邮件,有关系吗? +25 木水思豆 2026-08-25 28/1400 2026-08-26 14:53 by draco1987
[基金申请] 今天务委会开完了,明天出结果吗 +19 angus9576 2026-08-25 23/1150 2026-08-26 10:03 by zp519
信息提示
请填处理意见