- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
专家系统实验
学生实验报告
2010 年 10 月 27 日
实验名称:一个关于爱情之路的测试的小型专家系统
实验目的与要求:
目的:
通过实现一个简单的不通用的基于回溯推理的专家系统,来理解产生式系统的推理的基本思想和过程。
要求:
1、确定推理方法(正向还是反向),并根据问题设计实现一个简单的不通用推理机(匹配、冲突消解)
2、规则库要求至少包含15条规则
3、初始事实可以任意给定,输入初始事实后能够得到推理结果
4、设计人机界面,解释模块提供查询规则的功能
5、可以不考虑知识库管理模块
6、提交实验报告
7、报告中要有推理树
实验内容:
本实验我是设计了一个关于爱情之路的测试的小型专家系统,主要是根据一些观察到的事实,依据系统给出的一系列规则来进行回溯处理,逐渐的推导出结果。本次实验设计了一个简单的不通用推理机,推理机给出的推理结果是“”。
专家系统的系统结构包括:知识库,推理机,动态数据库,人机界面,解释模块,知识库管理模块。
专家系统结构图
程序设计思想
本次实验采用的是正向推理的方法,是从已知事实出发,通过规则库求得结论,也称为自底向上,或称为数据驱动方式。这种推理方式是正向使用原则,即问题的初始状态作为初始数据库,在仅当数据库中的事实满足某条规则的前提时,这条规则才能够被使用。程序中采用的是基于用户按照规则点击,逐步得出结果的。
正向推理的步骤
步1 将初始事实置入动态数据库;
步2 用动态数据库中的事实,匹配目标条件,若目标条件满足,则推理成功,结束。
步3 用规则库中各规则的前件匹配动态数据库中的事实,将匹配成功的规则组成冲突集;
步4 若冲突集为空,则运行失败,退出。
步5 对冲突集做冲突消解,对选择执行的各规则,将其结论加入动态数据库,或执行其动作,转步2。
正向推理的流程图
程序实现过程
初始事实:
设计邂逅
体贴容让
送花
有责任心
勤奋努力
明确表示
不百依百顺
规则:
R1:if请人介绍then认识
R2:if参加聚会 then认识
R3:if搭讪 then 认识
R4:if设计邂逅 then 认识
R5:if认识∧一起自习then交往
R6:if认识∧送花then交往
R7:if认识∧约会then 交往
R8:if 交往∧(有责任心Ⅴ踏实可靠) then赢得好感
R9:if 交往∧(温柔善良Ⅴ善解人意) then赢得好感
R10:if交往∧勤奋努力 then 赢得好感
R11:if交往∧阳关活泼then 赢得好感
R12:if赢得好感∧暗示then确立恋爱关系
R13:if赢得好感∧明示then确立恋爱关系
R14:if赢得好感∧牵手then确立恋爱关系
R15:if恋爱关系∧体贴容让∧不百依百顺then建立长期关系
推理过程:
初始事实写入动态数据库
{设计邂逅,体贴容让,送花,有责任心,勤奋努力,明确表示,不百依百顺}
推理过程:(推理树)
程序显示结果
主界面如下:
结果如下:
体会与总结
程序片段
void CRengongDlg::OnCheck1()
{
// TODO: Add your control notification handler code here
//shishi[0]=1;
int state = ((CButton*)GetDlgItem(IDC_CHECK1))-GetCheck();
if(state==BST_CHECKED)
{
shishi[0]=1;
}
else
if(state==BST_UNCHECKED)
{
shishi[0]=0;
shishi[7]=0;
}
}
void CRengongDlg::OnCheck2()
{
// TODO: Add your control notification handler code here
//shishi[1]=1;
int state = ((CButton*)GetDlgItem(IDC_CHECK1))-GetCheck();
if(state==BST_CHECKED)
{
shishi[1]=1;
//MessageBox(sdf,dafadsf,MB_OK);
}
else
if(state==BST_UNCHECKED)
{
shishi[1]=0;
shishi[8]=0;
}
}
void CRengongDlg::OnCheck3()
{
// TODO: Add your control notificat
文档评论(0)