User Portlet
| Discussions |
|---|
| Or perhaps a bit better m = Table[If[i == j, 0, RandomInteger[{0, 5}]], {i, 10}, {j, 10}]; nn = 1; sum = 0; While[ sum != 30, nn = nn + 1; sum = Total[ tt = Table[If[j != 3, RandomInteger[{0, 5}],... |
User Portlet | Discussions |
|---|
| Or perhaps a bit better m = Table[If[i == j, 0, RandomInteger[{0, 5}]], {i, 10}, {j, 10}]; nn = 1; sum = 0; While[ sum != 30, nn = nn + 1; sum = Total[ tt = Table[If[j != 3, RandomInteger[{0, 5}],... |