User Portlet User Portlet

Discussions
Sorry, it should be a list with probabilities (floats). omega = Sort /@ Tuples[{Range[1, 4], Range[1, 6], Range[1, 8], Range[1, 12], Range[1, 20]}]; ntot = Length[omega]; poäng[{x_, x_, x_, y_, y_} /; x != y] := 3...