clc;
clear all;
projdata1=[1 2 3];
[u1,y]=projdata1;
x=[u1];
yd=y;
[m,n]=size(x);
y=zeros(m,1);
m=length(yd);
i=20;
w1=0.1*rand(1,i);
w2=0.1*rand(n,i);
eta1=0.01;
eta2=0.01;
j=50;
M=m;
for ii=1:j
for k=1:m
P=x(k,:);
yi=purelin(P*w2+1);
y(k)=purelin(w1*yi'+1);
e(k)=y(k)-yd(k);
delw1=e(k)*dpurelin(w1,y(k)).*yi;
delw2=e(k)*(P'*(dpurelin(yi,y(k)).*w1)).*dpurelin(w2,yi);
w1=w1-2*eta1*delw1;
w2=w2-2*eta2*delw2;
y
end
JE(ii)=(e*e'/M);
end
JE(j)
figure(1);
plot(yd,'.k');
hold on;
plot(y,'k');
XLABEL('Number of samples');
YLABEL('Y and Yd');
figure(2);
plot(JE,'k');
title(' square error');
for k=1:m
P=x(k,:);
yi=purelin(P*w2+1);
y(k)=purelin(w1*yi'+1);
end
e=yd'-y';
E=(e*e');
figure(3);
plot(yd,'g');
hold on;
plot(y,'b');
w1
w2
没有合适的资源?快使用搜索试试~ 我知道了~
ankur_6_-(2).rar_engineering_mechanical
共1个文件
m:1个
1.该资源内容由用户上传,如若侵权请联系客服进行举报
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
版权申诉
0 下载量 9 浏览量
2022-09-19
21:05:29
上传
评论
收藏 513B RAR 举报
温馨提示
neural network in mechanical engineering
资源推荐
资源详情
资源评论
收起资源包目录
ankur_6_-(2).rar (1个子文件)
ankur_6_ (2).m 821B
共 1 条
- 1
资源评论
朱moyimi
- 粉丝: 64
- 资源: 1万+
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功