aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

March 2014 update

Browse source
This commit is contained in:
Ingy döt Net 2014-04-02 16:56:35 +00:00
parent 09687c4926
commit a25938f123
1846 changed files with 21876 additions and 5203 deletions
Download patch file Download diff file Expand all files Collapse all files

10
Task/Knuths-algorithm-S/D/knuths-algorithm-s-1.d
View file

@ -8,7 +8,7 @@ auto sofN_creator(in int n) {
i++;
if (i <= n)
sample ~= item;
else if (uniform(0.0, 1.0) < (cast(double)n / i))
else if (uniform(0.0, 1.0) < (double(n) / i))
sample[uniform(0, n)] = item;
return sample;
};
@ -18,12 +18,12 @@ void main() {
enum nRuns = 100_000;
size_t[10] bin;
foreach (trial; 0 .. nRuns) {
auto sofn = sofN_creator(3);
foreach (immutable trial; 0 .. nRuns) {
immutable sofn = sofN_creator(3);
int[] sample;
foreach (item; 0 .. bin.length)
foreach (immutable item; 0 .. bin.length)
sample = sofn(item);
foreach (s; sample)
foreach (immutable s; sample)
bin[s]++;
}
writefln("Item counts for %d runs:\n%s", nRuns, bin);