Line 0
Link Here
|
|
|
1 |
--- cdpark.c.orig 2019-08-03 10:37:50 UTC |
2 |
+++ cdpark.c |
3 |
@@ -36,8 +36,8 @@ void park(char *filename) |
4 |
puts("\t|ble, provides input to a KSTEST based on a sample of 10. |"); |
5 |
puts("\t|-------------------------------------------------------------|\n"); |
6 |
|
7 |
- printf("\t\tCDPARK: result of %d tests on file %s\n", no_obs, filename); |
8 |
- printf("\t (Of %d tries, the average no. of successes", no_trials); |
9 |
+ printf("\t\tCDPARK: result of %lu tests on file %s\n", no_obs, filename); |
10 |
+ printf("\t (Of %lu tries, the average no. of successes", no_trials); |
11 |
printf(" should be \n\t %.1f with sigma=%.1f)\n\n", mu, sigma); |
12 |
printf("\t No. succeses\t\tz-score\t\tp-value\n"); |
13 |
|
14 |
@@ -79,7 +79,7 @@ void park(char *filename) |
15 |
z=(no_succ-mu)/sigma; |
16 |
p[i-1]=1-Phi(z); |
17 |
|
18 |
- printf("\t\t%d\t\t% .4f\t\t%f\n", no_succ, z, p[i-1]); |
19 |
+ printf("\t\t%lu\t\t% .4f\t\t%f\n", no_succ, z, p[i-1]); |
20 |
} |
21 |
uni("close"); |
22 |
|
23 |
@@ -88,11 +88,11 @@ void park(char *filename) |
24 |
mean=(real)sum/no_obs; |
25 |
var=(real)ss/no_obs-mean*mean; |
26 |
|
27 |
- printf("\t Square side=%d, avg. no. parked=%.2f", side, mean); |
28 |
+ printf("\t Square side=%lu, avg. no. parked=%.2f", side, mean); |
29 |
printf(" sample std.=%.2f\n", sqrt(var)); |
30 |
|
31 |
pvalue=KStest(p, no_obs); |
32 |
- printf("\t p-value of the KSTEST for those %d", no_obs); |
33 |
+ printf("\t p-value of the KSTEST for those %lu", no_obs); |
34 |
printf(" p-values: %f\n\n", pvalue); |
35 |
|
36 |
return; |