<![CDATA[
#include <stdio.h>
#include <numeric.h>
#define N 4 /* data array size */
#define N1 5
#define N2 4
int main(){
int i,j;
array double xy[N2][N2];
array double x[N][N1]={{1,2,3,4,5},
{1,2,3,4,5},
{0,0,0,0,1},
{2,3,4,5,6}};
corrcoef(xy,x);
printf("x=%6.3f\n",x);
printf("correlation coefficient matrix\n");
printf("%6.3f\n",xy);
}
]]>
<![CDATA[
x= 1.000 2.000 3.000 4.000 5.000
1.000 2.000 3.000 4.000 5.000
0.000 0.000 0.000 0.000 1.000
2.000 3.000 4.000 5.000 6.000
correlation coefficient matrix
1.000 1.000 0.707 1.000
1.000 1.000 0.707 1.000
0.707 0.707 1.000 0.707
1.000 1.000 0.707 1.000
]]>