kriging.cpp

java资讯：Java新技术获得业界认可-Java频道-中国IT实验室2006年9月24日 ... 文章标题：java资讯：Java新技术获得业界认可。中国IT实验室JAVA频道是一个专业的JAVA

#include ".\kriging.h"

private function CreatePoints():void//建立二维数组points[][]储存各点的数据
{
	var i:int,j:int;
	i=0;
	//trace(spotdata.point[0].id);
	while((spotdata.point[i].id)!=0)
	{
		points[i]=new Array();
		points[i][0]=spotdata.point[i].id;
		points[i][1]=spotdata.point[i].x;
		points[i][2]=spotdata.point[i].y;
		points[i][3]=spotdata.point[i].z;
		i++;
	}
	pointsnum=i;
}
private function CreateDis():void//建立原始点每两点之间的距离矩阵
 {
	 var i:int,j:int;
	 for (i=0;i<pointsnum;i++)
	 {
		 dis[i]=new Array();
		 for (j=0;j<pointsnum;j++)
		 {
			 if (i==j) dis[i][j]=0;
			 else
			 {
				 dis[i][j]=Math.sqrt((points[i][1]-points[j][1])*(points[i][1]-points[j][1])+(points[i][2]-points[j][2])*(points[i][2]-points[j][2]));
			 }
		 }
	 }

 }
 Kriging::Kriging(void)
 {
 }

 Kriging::~Kriging(void)
 {
 }