erlang更有效的合併元組列表

Question

我正在尋找更高效的方法。

[{name, "Joe"}, {color, "Red"}, {file, "none"}] => {name,"Joe",color,"Red",file,"none"}. 

list_to_tuple(lists:flatten([tuple_to_list(X1) || X1 <- L])) 

Answer 1

list_to_tuple([X || T <- L, X <- tuple_to_list(T)])). 

或

list_to_tuple([X || {K, V} <- L, X <- [K, V]]). 

或更加明確，可能是最有效的

merge_tuple_list(L) -> list_to_tuple(merge_tuple_list_(L)). 

merge_tuple_list_([{K, V} | T]) -> [K, V | merge_tuple_list_(T) ]; 
merge_tuple_list_([])   -> []. 

Answer 2

也許

list_to_tuple(lists:flatten([K, V] || {K, V} <- L])).