分解列表并用索引号标记每个元素

Question

如何拆分作为参数传递给函数的列表并用数字标记每个元素？

我遇到的问题是如何在 erlang 中递增，因为没有 for 循环。

谢谢

Answer 1

这就是你想做的吗？

tagger(List) ->
    tagger(List, 0).
tagger([Head|Tail], Index) ->
    [{Head, Index}|tagger(Tail, Index + 1)];
tagger([], _Index) ->
    [].

因为如果是的话，您可以使用lists:mapfoldl：

lists:mapfoldl(fun (A, AccIn) -> {{A, AccIn}, AccIn + 1} end, 0, List).