定义一:MInitDiag(L1[,…LN],InitValue:[Int|Int64|Double]):FMArray
说明:初始化一个对角线相同值的N维对角矩阵
如果N为1,则效果同Minit,创建的是一个值相同的一维数组。
多维对角矩阵即可理解为各维度下标相同的点为对角点。
参数:L1…LN为维度1到维度N的长度
最后一个参数InitValue为对角线的数字常量,可以为整型、长整型、浮点数。
返回:N维矩阵
范例:
范例01:
//初始化一个对角线为1的3*3的二维矩阵
Fmd:= MinitDiag(3,3,1);
Return Fmd;
返回:
定义二:MInitDiag(Larray:Array,InitValue:[Int|Int64|Double]):FMArray
说明:功能参照定义一。与定义一的区别是将维度放到一个array数组中,而不是N个可选参数,所以定义二的方式中,MInitDiag函数的参数只有两个。
参数:
LArray:维度长度数组,例如array(2,3)就是2*3矩阵
InitValue:为对角线的数字常量,可以为整型、长整型、浮点数。
返回:N维矩阵
范例:
范例02:
//将范例01中的初始化变更如下,效果一样
Fmd:= MinitDiag(array(3,3),1);
//初始化一个3*2的对角线为1.0的矩阵
Fmd2:= MinitDiag(array(3,2),1.0);
Return Fmd2;
返回: