返回列表的最大值

Question

我正在尝试返回列表的最大值。

我有以下代码

list_max([]) ->
    [];
list_max([H|T]) ->
    list_max(H, T).
list_max(Temp, []) ->
    Temp;
list_max(Temp, [H|T]) when H > Temp ->
    Temp = H;
list_max(Temp, T).

，但正在努力与 Erlang 建立联系。

如何将某些内容分配给 temp 并将其替换为最高值？

Answer 1

Erlang 是我发现展示比解释更容易的语言之一。

list_max([]   ) -> empty;
list_max([H|T]) -> {ok, list_max(H, T)}.

list_max(X, []   )            -> X;
list_max(X, [H|T]) when X < H -> list_max(H, T);
list_max(X, [_|T])            -> list_max(X, T).

并这样称呼它：

{ok, Max} = list_max(MyList).

Answer 2

抱歉，也许我错过了一些东西。您是否在寻找：

lists:max(List). %% Find the max in List

Answer 3

如何将某些内容分配给 temp 并将其替换为最高值？

简短的回答是你不能。 Erlang 中的变量一旦分配就无法更改。

稍微长一点的答案是，虽然您无法更改特定函数调用中的变量，但您始终可以自递归。 Erlang 中的尾递归得到了优化。

在您提供的示例代码中，list_max 将仅查看列表的前两个元素。第四和第五子句应分别再次调用 list_max，并在第一个参数中使用 Temp 的新值。这是函数式语言中常见的事情。在这种情况下，Temp 被称为累加器（我经常将变量命名为 Acc 来反映这种用途，但当然您可以将其命名为任何您想要的名称）。

让我展示另一个解决方案，可以被视为“介于”Macelo 的答案和 stmi 的答案之间：（

list_max( [H|T] ) -> list_max( H , T ).

list_max( X , []    ) -> X;
list_max( X , [H|T] ) -> list_max( erlang:max(H, X) , T ).

我还放弃了检测空列表的子句，因为我认为它并没有真正给你带来太多 - 尽管它现在会抛出一个如果您使用空列表调用它，则例外。）

Answer 4

Erlang 是一个单一的赋值，所以你不能改变“变量”。您只能创建新的。

我的建议是查看列表模块。在lists.erl中，您会发现：

max([H|T]) -> max(T, H).

max([H|T], Max) when H > Max -> max(T, H);
max([_|T], Max)              -> max(T, Max);
max([],    Max)              -> Max.

您不更新Max变量（示例中的Temp），而是使用新值调用函数或从函数返回它。

简单易行...:-)

Answer 5

您还可以在内置函数中表达 not：

-module(list_max).
-compile(export_all).

list_max([]) -> none;
list_max([H | T] = List) ->
    lists:foldl(fun erlang:max/2, H, T);
list_max(_) -> badarg.