bp.rar_visual c

c 语言编 bp 算法及使用说明

训练样本数据文件 sample.txt 输入格式:(单样本对)

(x1,x2,x3....xh,d1,d2,d3,...dj)

测试样本数据输入:(从键盘输入)

x1,x2,x3...xh

屏幕输出:y1,y2,y3...yj

在确定网络结构以后，即可确定(输入层)nh,(隐层)ni,(输出层)nj,(样本容量)nk

每次使用之前请修改网络结构数据。

#include <stdio.h>

#define nk 30

#define nr 0.85/*学习效率*/

#define EPS 0.00001

float x[nk][nh],d[nk][nj],whi[nh][ni],wij[ni][nj],thi[ni],thj[nj];

int h,i,j,k;

float xmin[nh],xmax[nh],dmin[nj],dmax[nj];

FILE *fp1,*fp2;

void init(void);

void startleaning(void);

void testsample(void);

clrscr();

printf("Can not find the learning sample file!\n");

exit(0);

}

for(k=0;k<nk;k++)

{

for(h=0;h<nh;h++)

fscanf(fp1,"%f",&x[k][h]);

for(j=0;j<nj;j++)

fscanf(fp1,"%f",&d[k][j]);

}

for(h=0;h<nh;h++)

if(x[k][h]<x[min][h]) min=k;

xmin[h]=x[min][h];

x[k][h]=(x[k][h]-xmin[h])/(xmax[h]-xmin[h]);

}

for(j=0;j<nj;j++)

{

min=1;max=1;

for(k=0;k<nk;k++)

{

if(d[k][j]<d[min][j]) min=k;

if(d[k][j]>d[max][j]) max=k;

}

dmin[j]=d[min][j];

dmax[j]=d[max][j];

}

void startlearning(void)

float t,error[nk],gerror,xj[nj],xi[ni],yj[nj],yi[ni],pxi[ni],pxj[nj];

if(fp2==0)

{

for(i=0;i<ni;i++)

{