% Tire au hasard de 0 à 3 messages sur les 10 derniers postés, renvoie une liste de int()
% répartition :
-% 0 : 0.5
-% 1 : 0.3
+% 0 : 0.1
+% 1 : 0.7
% 2 : 0.15
% 3 : 0.05
messages_id_rand() ->
R = random:uniform(),
- if R =< 0.5 ->
+ if R =< 0.1 ->
[];
true ->
Messages = lists:map(fun(#minichat{id = Id}) -> Id end, euphorik_bd:messages(8)),
if
- R > 0.5 andalso R =< 0.8 ->
+ R > 0.1 andalso R =< 0.8 ->
tire_element_rand(1, Messages);
R > 0.8 andalso R =< 0.95 ->
tire_element_rand(2, Messages);