这是你想要做的吗?
tagger(List) ->
tagger(List, 0).
tagger([Head|Tail], Index) ->
[{Head, Index}|tagger(Tail, Index + 1)];
tagger([], _Index) ->
[].
Run Code Online (Sandbox Code Playgroud)
因为如果是,你可以使用lists:mapfoldl:
lists:mapfoldl(fun (A, AccIn) -> {{A, AccIn}, AccIn + 1} end, 0, List).
Run Code Online (Sandbox Code Playgroud)