智能车制作

 找回密码
 注册

扫一扫,访问微社区

查看: 20927|回复: 26
打印 上一主题 下一主题

模糊控制算法简介及其算法实现

    [复制链接]

184

主题

1972

帖子

0

精华

功勋会员

E=mc^2.0

Rank: 10Rank: 10Rank: 10

积分
15110

论坛骨干奖章活跃会员奖章优秀会员奖章资源大师奖章论坛元老奖章

威望
5404
贡献
8060
兑换币
1555
注册时间
2010-12-8
在线时间
823 小时
跳转到指定楼层
1#
发表于 2012-5-16 20:16:11 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
非原创,来源不详,大家凑合着看看吧,也许有帮助
    简介:模糊控制算法,是对手动操作者的手动控制策略、经验的总结.模糊控制算法有多种实现形式,采用应用最早、最广泛的查表法,可大大提高模糊控制的时效性,节省内存空间

    由于项目需要,需要模糊控制算法,之前此类知识为0,经过半个多月的研究,终于有的小进展。开始想从强大的互联网上搜点c代码来研究下,结果搜遍所有搜索引擎都搜不到,以下本人从修改的模糊控制代码,经过自己修改后可在vc6.0,运行!输入e表示输出误差,ec表示误差变化率,经过测试具有很好的控制效果,对于非线性系统和数学模型难以建立的系统来说有更好的控制效果!现将其公开供大家学习研究!

#include <stdio.h>
#include"math.h"
#define PMAX    100   
#define PMIN    -100   
#define DMAX    100     
#define DMIN    -100           
#define FMAX    100       /*语言值的满幅值*/
int PFF[4]={0,12,24,48};
/*输入量D语言值特征点*/
int DFF[4]={0,16,32,64};
/*输出量U语言值特征点*/
int UFF[7]={0,15,30,45,60,75,90};
/*采用了调整因子的规则表,大误差时偏重误差,小误差时偏重误差变化*/
/*a0=0.3,a1=0.55,a2=0.74,a3=0.89   */   
int rule[7][7]={
//误差变化率 -3,-2,-1, 0, 1, 2, 3     // 误差     
      {-6,-6,-6,-5,-5,-5,-4,},   //   -3   
      {-5,-4,-4,-3,-2,-2,-1,},   //   -2
      {-4,-3,-2,-1, 0, 1, 2,},   //   -1
      {-4,-3,-1, 0, 1, 3, 4,},   //    0
      {-2,-1, 0, 1, 2, 3, 4,},   //    1
      { 1, 2, 2, 3, 4, 4, 5,},   //    2
      { 4, 5, 5, 5, 6, 6, 6}};   //    3

/**********************************************************/
int   Fuzzy(int P,int D)   /*模糊运算引擎*/
{
int    U;           /*偏差,偏差微分以及输出值的精确量*/
unsigned int   PF[2],DF[2],UF[4];   /*偏差,偏差微分以及输出值的隶属度*/
int    Pn,Dn,Un[4];
long   temp1,temp2;      

/*隶属度的确定*/
/*根据PD的指定语言值获得有效隶属度*/
if(P>-PFF[3] && P<FF[3])
{
    if(P<=-PFF[2])     
{
   Pn=-2;
   PF[0]=FMAX*((float)(-PFF[2]-P)/(PFF[3]-PFF[2]));
}
    else if(P<=-PFF[1])   
   {
    Pn=-1;
    PF[0]=FMAX*((float)(-PFF[1]-P)/(PFF[2]-PFF[1]));
   }
    else if(P<=PFF[0])   
   {
    Pn=0;
    PF[0]=FMAX*((float)(-PFF[0]-P)/(PFF[1]-PFF[0]));
   }
    else if(P<=PFF[1])   
   {
    Pn=1; PF[0]=FMAX*((float)(PFF[1]-P)/(PFF[1]-PFF[0]));
   }
    else if(P<=PFF[2])
   {
    Pn=2; PF[0]=FMAX*((float)(PFF[2]-P)/(PFF[2]-PFF[1]));
   }
    else if(P<=PFF[3])   
   {
    Pn=3; PF[0]=FMAX*((float)(PFF[3]-P)/(PFF[3]-PFF[2]));
   }                  
    }
else if(P<=-PFF[3])   
   {
    Pn=-2;   PF[0]=FMAX;
   }
else if(P>=PFF[3])   
   {
    Pn=3;   PF[0]=0;
   }
PF[1]=FMAX-PF[0];  
if(D>-DFF[3] && D<DFF[3])
{
    if(D<=-DFF[2])     
{
   Dn=-2;DF[0]=FMAX*((float)(-DFF[2]-D)/(DFF[3]-DFF[2]));
}
    else if(D<=-DFF[1])   
   {
    Dn=-1;
    DF[0]=FMAX*((float)(-DFF[1]-D)/(DFF[2]-DFF[1]));
   }
    else if(D<=DFF[0])   
   {
    Dn=0;
    DF[0]=FMAX*((float)(-DFF[0]-D)/(DFF[1]-DFF[0]));
   }
    else if(D<=DFF[1])   
   {
    Dn=1;
    DF[0]=FMAX*((float)(DFF[1]-D)/(DFF[1]-DFF[0]));
   }
    else if(D<=DFF[2])   
   {
    Dn=2; DF[0]=FMAX*((float)(DFF[2]-D)/(DFF[2]-DFF[1]));
   }
    else if(D<=DFF[3])   
   {
    Dn=3; DF[0]=FMAX*((float)(DFF[3]-D)/(DFF[3]-DFF[2]));
   }   
    }
else if(D<=-DFF[3])   
   {
    Dn=-2;
    DF[0]=FMAX;
   }
else if(D>=DFF[3])   
   {
   Dn=3;
   DF[0]=0;
   }
DF[1]=FMAX-DF[0];
/*使用误差范围优化后的规则表rule[7][7]*/
/*输出值使用13个隶属函数,中心值由UFF[7]指定*/
/*一般都是四个规则有效*/
Un[0]=rule[Pn-1+3][Dn-1+3];
Un[1]=rule[Pn+3][Dn-1+3];
Un[2]=rule[Pn-1+3][Dn+3];   
Un[3]=rule[Pn+3][Dn+3];
if(PF[0]<=DF[0])
   UF[0]=PF[0];
else
   UF[0]=DF[0];
if(PF[1]<=DF[0])
   UF[1]=PF[1];
else
   UF[1]=DF[0];
if(PF[0]<=DF[1])
   UF[2]=PF[0];
else
   UF[2]=DF[1];
if(PF[1]<=DF[1])
   UF[3]=PF[1];
else
   UF[3]=DF[1];
/*同隶属函数输出语言值求大*/
   
if(Un[0]==Un[1])
{
   if(UF[0]>UF[1])
    UF[1]=0;
   else
    UF[0]=0;
}
if(Un[0]==Un[2])
{
   if(UF[0]>UF[2])
    UF[2]=0;
   else
    UF[0]=0;
}
if(Un[0]==Un[3])
{
   if(UF[0]>UF[3])
    UF[3]=0;
   else
    UF[0]=0;
}
if(Un[1]==Un[2])
{
   if(UF[1]>UF[2])
    UF[2]=0;
   else
    UF[1]=0;
}
if(Un[1]==Un[3])
{
   if(UF[1]>UF[3])
    UF[3]=0;
   else
    UF[1]=0;
}
if(Un[2]==Un[3])
{
   if(UF[2]>UF[3])
    UF[3]=0;
   else
    UF[2]=0;
}

/*重心法反模糊*/
/*Un[]原值为输出隶属函数标号,转换为隶属函数值*/
if(Un[0]>=0)
   Un[0]=UFF[Un[0]];
else
   Un[0]=-UFF[-Un[0]];
if(Un[1]>=0)
   Un[1]=UFF[Un[1]];
else
   Un[1]=-UFF[-Un[1]];
if(Un[2]>=0)
   Un[2]=UFF[Un[2]];
else
   Un[2]=-UFF[-Un[2]];
if(Un[3]>=0)
   Un[3]=UFF[Un[3]];
else
   Un[3]=-UFF[-Un[3]];
   
temp1=UF[0]*Un[0]+UF[1]*Un[1]+UF[2]*Un[2]+UF[3]*Un[3];
temp2=UF[0]+UF[1]+UF[2]+UF[3];
U=temp1/temp2;
return U;
}

void main()
{
int a=0,e,ec;
/*int nowpoint,p1,p2=1;
FILE *in,*out;
in=fopen("in.txt","r");
out=fopen("out.txt","w");*/
//while(!feof(in))
while(1)
{
  
   //fscanf(in,"%d",&nowpoint);
   //p1=nowpoint;
   //e=0-nowpoint;
   //ec= p1-p2;
   printf("请输入e:");
   scanf("%d",&e);
        printf("请输入ec:");
   scanf("%d",&ec);
   a=Fuzzy(e,ec);
   //fprintf(out,"%d   ",a);
   //printf("%d:   ",p1);
        printf("e: %d     ec: %d    ",e,ec);
   printf("a: %d   \n",a);
   //p2=p1;
}
//fclose(in);
//fclose(out);
}

13

主题

120

帖子

0

精华

金牌会员

Rank: 6Rank: 6

积分
1967
威望
1020
贡献
445
兑换币
223
注册时间
2012-3-6
在线时间
251 小时
毕业学校
华侨大学
2#
发表于 2012-5-16 21:14:47 | 只看该作者
你几个嘛意思?我也在研究模糊,可否交流一下qq: 595351474
回复 支持 反对

使用道具 举报

184

主题

1972

帖子

0

精华

功勋会员

E=mc^2.0

Rank: 10Rank: 10Rank: 10

积分
15110

论坛骨干奖章活跃会员奖章优秀会员奖章资源大师奖章论坛元老奖章

威望
5404
贡献
8060
兑换币
1555
注册时间
2010-12-8
在线时间
823 小时
3#
 楼主| 发表于 2012-5-16 21:20:04 | 只看该作者
天涯々湖畔 发表于 2012-5-16 21:14
你几个嘛意思?我也在研究模糊,可否交流一下qq: 595351474

我暂停研究这个了,转向研究机械了
回复 支持 反对

使用道具 举报

19

主题

667

帖子

0

精华

金牌会员

Rank: 6Rank: 6

积分
2730

热心会员奖章特殊贡献奖章论坛骨干奖章推广达人奖章在线王奖章活跃会员奖章优秀会员奖章

威望
1504
贡献
364
兑换币
29
注册时间
2012-2-4
在线时间
431 小时
毕业学校
外国语学校
4#
发表于 2012-5-16 22:01:37 | 只看该作者
znfc2 发表于 2012-5-16 21:20
我暂停研究这个了,转向研究机械了

基友这么快就放上来了啊!!
回复 支持 反对

使用道具 举报

19

主题

670

帖子

0

精华

常驻嘉宾

Rank: 8Rank: 8

积分
3466

热心会员奖章优秀会员奖章在线王奖章论坛元老奖章

威望
1709
贡献
977
兑换币
265
注册时间
2012-3-4
在线时间
391 小时
5#
发表于 2012-5-16 23:17:19 | 只看该作者
顶啊
回复 支持 反对

使用道具 举报

22

主题

246

帖子

0

精华

常驻嘉宾

Rank: 8Rank: 8

积分
4997
QQ
威望
2596
贡献
1389
兑换币
860
注册时间
2011-12-17
在线时间
506 小时
6#
发表于 2012-5-17 11:29:55 | 只看该作者
神贴顶起~
回复 支持 反对

使用道具 举报

184

主题

1972

帖子

0

精华

功勋会员

E=mc^2.0

Rank: 10Rank: 10Rank: 10

积分
15110

论坛骨干奖章活跃会员奖章优秀会员奖章资源大师奖章论坛元老奖章

威望
5404
贡献
8060
兑换币
1555
注册时间
2010-12-8
在线时间
823 小时
7#
 楼主| 发表于 2012-5-17 12:28:49 | 只看该作者
wo520 发表于 2012-5-16 22:01
基友这么快就放上来了啊!!

老外早就研究出来的东西,都是浮云啊
回复 支持 反对

使用道具 举报

6

主题

174

帖子

0

精华

金牌会员

Rank: 6Rank: 6

积分
1284
威望
768
贡献
378
兑换币
98
注册时间
2011-10-26
在线时间
69 小时
8#
发表于 2012-6-10 21:19:03 | 只看该作者
神马意思
回复 支持 反对

使用道具 举报

0

主题

27

帖子

0

精华

高级会员

Rank: 4

积分
638
威望
344
贡献
158
兑换币
0
注册时间
2012-3-21
在线时间
69 小时
9#
发表于 2012-6-11 09:46:24 | 只看该作者
顶一个
回复 支持 反对

使用道具 举报

1

主题

25

帖子

0

精华

高级会员

Rank: 4

积分
657
威望
372
贡献
181
兑换币
65
注册时间
2012-2-1
在线时间
52 小时
毕业学校
东北大学
10#
发表于 2012-6-11 17:54:29 | 只看该作者
很强大,学习一下
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

关于我们|联系我们|小黑屋|智能车制作 ( 黑ICP备2022002344号

GMT+8, 2024-11-5 19:04 , Processed in 0.335005 second(s), 30 queries , Gzip On.

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表