Psst.. new poll here.
Psst.. new forums here.
Microsoft is blocking us again (TY IP Reputation!) so just use oauth login instead. :)
Paste
Pasted as Plain Text by Xgamer ( 16 years ago )
Funkce[r_, s_] := Module[{mat},
If[((r < 2) || (s < 2)), mat = RandomInteger[{-100, 100}, {2, 2}],
mat = RandomInteger[{-100, 100}, {r, s}]] ;
Print[MatrixForm[mat]];
a = {mat[[1]], mat[[2]]};
Print[MatrixForm[Transpose[a]]];
ListPlot[{Transpose[a]}, Joined -> True]
]
Funkce[5, 5]
Revise this Paste