动物识别专家系统实验报告

《动物识别专家系统实验报告》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、题目：动物识别专家系统一．实验目的理解和掌握产生式只是表示方法，能够用选定的编程语言实现产生式系统的规则库。二．实验内容（1）以动物识别系统的产生式规则为例。（2）用选定的编程语言建造规则库和综合数据库，并能对它们进行增加、删除和修改操作。三．实验原理动物识别专家系统是流行的专家系统实验模型，它用产生式r来表示知识，共15条r、可以识别七种动物，这些r既少又简单，可以改造他们，也可以加进新的r，还可以用来识别其他东西的新r来取代这些r。动物识别15条r:r1：IF动物有毛发THEN该动物是哺乳动物r2:IF动物能产奶THE

2、N该单位是哺乳动物r3:IF该动物有羽毛THEN该动物是鸟r4:IF动物会飞AND会下蛋THEN该动物是鸟r5:IF动物吃肉THEN该动物是肉食动物r6:IF动物有犬齿AND有爪AND眼盯前方THEN该动物是食肉动物r7:IF动物是哺乳动物AND有蹄THEN该动物是有蹄动物r8:IF动物是哺乳动物AND是反刍动物THEN该动物是有蹄动物r9:IF动物是哺乳动物AND是食肉动物AND是黄褐色的AND有暗斑点THEN该动物是豹r10：IF动物是黄褐色的AND是哺乳动物AND是食肉AND有黑条纹THEN该动物是虎r11：IF动物

3、有暗斑点AND有长腿AND有长脖子AND是有蹄类THEN该动物是长颈鹿r12：IF动物有黑条纹AND是有蹄类动物THEN该动物是斑马r13：IF动物有长腿AND有长脖子AND是黑色的AND是鸟AND不会飞THEN该动物是鸵鸟r14：IF动物是鸟AND不会飞AND会游泳AND是黑色的THEN该动物是企鹅r15：IF动物是鸟AND善飞THEN该动物是信天翁一．推理树部分推理树如下：长颈鹿长脖子长腿暗斑点有蹄类斑马黑条纹有蹄哺乳嚼反刍动物有毛发有奶r11r12r8r7r1r2二．代码程序是用java编写的规则对象代码：publi

4、cclassRule{privateArrayListpremise=newArrayList();privateintresult;publicvoidaddPremise(intitem){premise.add(item);}publicintsize(){returnpremise.size();}publicintgetPremiseAt(intindex){returnpremise.get(index);}publicvoidsetResult(intresult){thi

5、s.result=result;}publicintgetResult(){returnresult;}}规则库代码如下：publicclassRuleBase{privateArrayListrules=newArrayList();publicintsize(){returnrules.size();}publicRuleBase(){init();}publicvoidaddRule(Rulerule){rules.add(rule);}publicRulegetRuleAt(intindex

6、){returnrules.get(index);}publicvoidinit(){Rulerule1=newRule();rule1.addPremise(0);rule1.setResult(20);rules.add(rule1);Rulerule2=newRule();rule2.addPremise(1);rule2.setResult(20);rules.add(rule2);Rulerule3=newRule();rule3.addPremise(2);rule3.setResult(21);rules.a

7、dd(rule3);Rulerule4=newRule();rule4.addPremise(3);rule4.addPremise(13);rule4.setResult(21);rules.add(rule4);Rulerule5=newRule();rule5.addPremise(19);rule5.setResult(22);rules.add(rule5);Rulerule6=newRule();rule6.addPremise(4);rule6.addPremise(15);rule6.addPremise(

8、12);rule6.setResult(22);rules.add(rule6);Rulerule7=newRule();rule7.addPremise(20);rule7.addPremise(9);rule7.setResult(23);rules.add(rule7);Rulerule8=new