Ramz Temat założony przez niniejszego użytkownika |
[Wolfram Mathematica] Generowanie funkcji losowych » 2014-01-20 14:43:06 Czy jest tu ktoś kto pisał coś w Programie Wolfram Mathematica v.9.0?
Jeżeli tak, to ktoś pomógłby w napisaniu programu na generowanie losowych funkcji.
Mój kod:
a = x^2;
b = x + p + o;
c = o*x^p;
d = p*x;
e = o + x;
f = p*x^o;
g = x^o;
h = x;
i = p + x^2 + x^o;
j = Sin[x];
k = Cos[x];
l = Tan[x];
m = Cot[x];
n = RandomInteger[{1, 100}];
o = Mod[{n}, 13];
p = Mod[{n}, 20];
RandomChoice[{a + b + e + d, h, j, m, l + d + n + j, d, b + j + e,
c + e + m + j, d, f, d + j + i, l, e + g + l, c, c + a + b, k,
k + m, e, l + j, g, m + h + f + c, b, m + e + k, a,
a + c + d + b + g + m}]
Z tego co się dowiedziałem, to można to zapisać jakoś w prostszy sposób. |