erlang - 将列表列表转换为元组列表的最佳方法？

Question

将列表转换为这样的元组列表的最佳方法是什么[[1,2,3],[a,b,c],[4,5,6]]：

[{1,a,4},{2,b,5},{3,c,6}]

其中元组 N 由三个子列表中的每一个中的第 N 个元素组成？我应该使用尾递归函数、列表推导还是其他方法？

Answer 1

只需使用标准lists:zip3/3功能：

1> [L1,L2,L3] = [[1,2,3],[a,b,c],[4,5,6]].
[[1,2,3],[a,b,c],[4,5,6]]
2> lists:zip3(L1,L2,L3).
[{1,a,4},{2,b,5},{3,c,6}]

或者，如果您希望避免提取单个列表：

3> apply(lists, zip3, [[1,2,3],[a,b,c],[4,5,6]]).
[{1,a,4},{2,b,5},{3,c,6}]

Answer 2

我更喜欢您的案例列表理解，因为：

• 它是一小行代码，易于阅读，

• 它不需要辅助函数，因此完成的操作清晰可见。

  L_of_tuple = [list_to_tuple(X) || X <- L_of_list].

如果必须在很多地方进行这种转换，最好将它写在一个单独的函数中，然后任何解决方案（甚至是谨慎的体递归）对我都有好处。

Answer 3

一种优雅的解决方案可以是

lol2lot([[]|_]) -> [];
lol2lot(LoL) ->
    [ list_to_tuple([hd(L) || L <- LoL]) | lol2lot([tl(L) || L <- LoL]) ].

Answer 4

例如这样：

L =  [[1,2,3],[a,b,c],[4,5,6]].
Size = length(L).
T = [fun(I)->list_to_tuple([lists:nth(I,lists:nth(J,L)) ||J<-lists:seq(1,Size)]) end(I) || I<-lists:seq(1,Size)].