如何检测列表是否包含重复项？

Question

我想知道列表是否包含多次值.这就是我所拥有的.

has_dupes(List) ->
    has_dupes(List, []).

has_dupes([Item|List], Seen) ->
    case lists:filter(fun(Elem) -> Elem == Item end, Seen) of
        [] ->
            has_dupes(List, [Item|Seen]);
        _ ->
            true
    end;
has_dupes([], _Seen) ->
    false.

有没有更简单/更简洁/更惯用的方式来做到这一点？我是Erlang的新手.

Answer 1

erlang:length(List) == sets:size(sets:from_list(List)).

Answer 2

这个可能的解决方案怎么样？

has_dupes([H|T]) -> 
 case lists:member(H, T) of 
  true -> true;
  false -> has_dupes(T)
 end;
has_dupes([]) -> false.