Erlang - transformation des listes

Question

Je voudrais de l'aide, s'il vous plaît. J'ai une liste d'utilisateurs et leurs factures. Il peut y avoir plusieurs utilisateurs et chaque utilisateur peut avoir plusieurs factures. Donc, je voudrais passer de [{user, invoice}] à [{user, [invoice]}].

Par exemple, convertir cette ...

[{user1, invoice11}, {user1, invoice12}, {user2, invoice21}, {user2, invoice22}]. 

Dans cette ...

[{user1, [invoice11, invoice12]}, {user2, [invoice21, invoice22]}]. 

Answer 1

J'utilise fold() pour créer un dict puis en faire une liste:

UsersInvoices = [{user1, invoice11}, {user1, invoice12}, 
       {user2, invoice21}, {user2, invoice22}]. 

dict:to_list(lists:foldl(fun({User, Invoice}, D) -> 
          dict:append(User, Invoice, D) end, 
         dict:new(), UsersInvoices)). 

Answer 2

Vous n'avez pas besoin d'utiliser des plis ou des dictionnaires. En supposant qu'ils sont triés par les utilisateurs, vous pouvez le faire. Il maintient également la liste triée.

convert([{U, I}|R])->convert(R,[{U,[I]}]). 
convert([], RL)->lists:reverse(RL); 
convert([{U, I}|R], [{U,IL}|RL])->convert(R, [{U, [I|IL]}|RL]); 
convert([{U1, I}|R], [{U2, IL} |RL])->convert(R, [{U1, [I]}|[{U2, lists:reverse(IL)}|RL]]).