Prolog开发专家系-非确定因素.docVIP

Prolog开发专家系统-非确定因素 讨论用Prolog开发具有非确定因素的专家系统，将建造一个能够处理非确定因素的目标驱动的外壳程序Clam。上一章我们详细的叙述了如何时候目标驱动法来编制专家系统。这种目标驱动法可以很好的解决像识别鸟类那样具有明显结构层次的问题。 在前面这个系统中用户对问题的的答案都是百分之百的肯定或者否定的。也就是说都具有确切的答案。不过解决许多实际问题的时候，专家通常都考虑许多不确定的因素，而用户在回答问题的时候，也不会都是百分之百的肯定。例如在鸟类识别系统中，有些鸟的颜色就很难确定。在本章中，我们要来讨论具有非确定因素的专家系统，这里我们将建造一个能够处理非确定因素的目标驱动的外壳程序Clam。这里的推理机构已经不同于纯prolog的模式匹配和回溯，。所以在这个外壳程序中我们也包含了相应的推理机构。? 可信度 为了能够处理非确信因素，我们为每一条规则或者信息引入可信度的概念。在推理过程中，推理机构自动的处理不同的可信度的组合。我们还是从一个例子开始吧。在这个例子中可信度（cf）是从-100到100的整数。这是一个用来诊断汽车为什么不能够发动的专家系统，请注意我们引入的cf。goal problem.rule 1if not turn_over andbattery_badthen problem is battery.rule 2if lights_weakthen battery_bad cf 50. %注意cf为50，就表示是电池损坏的可信度是50。rule 3if radio_weakthen battery_bad cf 50.rule 4if turn_over andsmell_gasthen problem is flooded cf 80.rule 5if turn_over andgas_gauge is emptythen problem is out_of_gas cf 90.rule 6if turn_over andgas_gauge is lowthen problem is out_of_gas cf 30.ask turn_overmenu (yes no)prompt Does the engine turn over?.ask lights_weakmenu (yes no)prompt Are the lights weak?.ask radio_weakmenu (yes no)prompt Is the radio weak?.ask smell_gasmenu (yes no)prompt Do you smell gas?.ask gas_gaugemenu (empty low full)prompt What does the gas gauge say?.以上这些就是Clam外壳程序所定义的知识库的格式。这个知识库同样也是目标驱动的。在这个知识库中允许可信度相加。例如规则5和6的结论都是“汽车没有气了”，不过是从不同的角度得出的结论，规则2和3则是说“电池没有电了”，不过也都不是绝对确信的。使用Clam外壳程序和上面的知识库联接起来以后，就是一个完整的可以处理肥缺性因素的专家系统了，下面是某次对话的实例：consult, restart, load, list, trace, how, exit:consultDoes the engine turn over?: yesDo you smell gas?: yesWhat does the gas gauge say?emptylowfull: emptyproblem-out_of_gas-cf-90problem-flooded-cf-80done with problem 注意这个推理机构和prolog有所不同，但系统找到某一个答案以后，并没有停止搜索，它会找出所有的答案，并且给每个答案给出确信度，我们可以看出，这个确信度并不是概率值，它只是简单的为每个答案评分。在用户回答系统的问题的时候同样可以使用确信度。下面是这种对话的例子：:consultDoes the engine turn over?: yesDo you smell gas?: yes cf 50 %用户的回答使用了确信度What does the gas gauge say?emptylowfull: emptyproblem-out_of_gas-cf-90problem-flooded-c