rank.mata

来自「是一个经济学管理应用软件 很难找的 但是经济学学生又必须用到」· MATA 代码 · 共 14 行

*! version 3.0.0  20jan2005
version 9.0
mata:

real scalar rank(numeric matrix X, |real scalar tol) 
{
	numeric matrix Xcpy

	return(rank_from_singular_values(_svdsv(isfleeting(X) ? X : (Xcpy=X)),
					tol))
}

end