list - 如何计算列表中元素的数量？

Question

我需要编写一个小的 Prolog 程序来计算列表中每个元素的出现次数。

numberOfRepetition(input, result)

例如:

numberOfRepetition([a,b,a,d,c,a,b], X)

可以满意 X=[a/3,b/2,d/1,c/1]因为 a出现 3 次， b发生 2 次和 c和 d一度。

Answer 1

我不想给你答案，所以我会帮你解决这个问题:

% Find the occurrences of given element in list
%
% occurrences([a,b,c,a],a,X).
% -> X = 2.

occurrences([],_,0).
occurrences([X|Y],X,N):- occurrences(Y,X,W),N is W + 1.
occurrences([X|Y],Z,N):- occurrences(Y,Z,N),X\=Z.

根据您的努力和反馈，我可以帮助您得到答案。