4#include "local_proto.h"
19 for (i = 0; i < n; ++i) {
749 if (n > 50 || n < 3) {
751 fprintf(
stdout,
" THIS IS THE SHAPIRO-WILK TEST FOR SMALL SAMPLES\n");
752 fprintf(
stdout,
" THE SAMPLE SIZE MUST BE LESS THAN OR EQUAL TO 50\n");
758 for (i = 1; i <= k; ++i)
759 sumb += a[i - 1] * (
x[n - i + 1] -
x[i]);
int Cdhc_dcmp(const void *i, const void *j)
double * Cdhc_shapiro_wilk(double *x, int n)