使用Prolog防止深度优先搜索中的循环

有没有什么方法可以防止这段代码中的循环。

move(a,b).move(b,a).move(a,c).move(b,d).move(b,e).move(d,h).move(d,i).move(e,j).move(e,k).move(c,f).move(c,g).move(f,l).move(f,m).move(g,n).move(g,o).goal(n).goSolveTheMaze(Start,Way) :-    dfs(Start, Way),!.dfs(Goal, [Goal]) :-   goal(Goal),!.dfs(Start, [Start|Way])  :-    move(Start, N),    dfs(N, Way).

所以当move(a,b)移动到(b,c)时,不要返回到(b,a),当运行goSolveTheMaze(a,path)时。输出应该是path=[a,c,g,n]


回答:

如果你给dfs添加第三个参数,这个参数是一个你已经访问过的地点列表呢?你可以使用\+/1member/2来避免返回到你已经去过的地方。

例如,如果你使用以下代码:

move(a,b).move(b,a).move(a,c).move(b,d).move(b,e).move(d,h).move(d,i).move(e,j).move(e,k).move(c,f).move(c,g).move(f,l).move(f,m).move(g,n).move(g,o).goal(n).goSolveTheMaze(Start,Way) :-    dfs(Start, Way, [Start]),!.dfs(Goal, [Goal], _) :-   goal(Goal),!.dfs(Start, [Start|Way], Visited)  :-    move(Start, N),    \+ member(N, Visited),    dfs(N, Way, [N|Visited]).

那么查询:

?- goSolveTheMaze(a, X).

将产生结果:

X = [a, c, g, n]

回应评论“可以告诉我\+是什么意思吗?”的更新:

\+谓词在其参数无法被证明时为真。因此在上面的例子中,\+ member(N, Visited)这行代码的意思是“当N不是Visited列表中的成员时”。

参见:https://www.swi-prolog.org/pldoc/man?predicate=%5C%2B/1

Related Posts

L1-L2正则化的不同系数

我想对网络的权重同时应用L1和L2正则化。然而,我找不…

使用scikit-learn的无监督方法将列表分类成不同组别,有没有办法?

我有一系列实例,每个实例都有一份列表,代表它所遵循的不…

f1_score metric in lightgbm

我想使用自定义指标f1_score来训练一个lgb模型…

通过相关系数矩阵进行特征选择

我在测试不同的算法时,如逻辑回归、高斯朴素贝叶斯、随机…

可以将机器学习库用于流式输入和输出吗?

已关闭。此问题需要更加聚焦。目前不接受回答。 想要改进…

在TensorFlow中,queue.dequeue_up_to()方法的用途是什么?

我对这个方法感到非常困惑,特别是当我发现这个令人费解的…

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注