From professional translators, enterprises, web pages and freely available translation repositories.
rnormfixedseed[10]
rnormfixedseed[10]
Last Update: 2018-02-21
Usage Frequency: 1
Quality:
clear[mu, sigma, m, s]; manipulate[ with[{randr = rnormfixedseed[n, m, s]}, with[{dist = estimateddistribution[randr, normaldistribution[mu, sigma]]}, show[histogram[randr, automatic, "probabilitydensity"], plot[pdf[dist, x], {x, m - 5 s, m + 5 s}, plotstyle -> thick]] ]], {{n, 1000, "number of points"}, {100, 500, 1000, 2000, 5000, 10000, 50000}}, grid[ { {row[{control[{{m, 0, "mean"}, 0, 100}], framed@dynamic[m]}, " "]}, {row[{control[{{s, 1, "standard deviation"}, 0.01, 10}], framed@dynamic[s]}, " " ]} }]]
clear[mu, sigma, m, s]; manipulate[ with[{randr = rnormfixedseed[n, m, s]}, with[{dist = estimateddistribution[randr, normaldistribution[mu, sigma]]}, show[histogram[randr, automatic, "probabilitydensity"], plot[pdf[dist, x], {x, m - 5 s, m + 5 s}, plotstyle -> thick]] ]], {{n, 1000, "number of points"}, {100, 500, 1000, 2000, 5000, 10000, 50000}}, grid[ { {row[{control[{{m, 0, "mean"}, 0, 100}], framed@dynamic[m]}, " "]}, {row[{control[{{s, 1, "standard deviation"}, 0.01, 10}], framed@dynamic[s]}, " " ]} }]]
Last Update: 2018-02-21
Usage Frequency: 1
Quality:
Warning: Contains invisible HTML formatting
