invfft.mata

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

*! version 1.0.0  15nov2004
version 9.0
mata:

numeric vector invfft(numeric vector H)
{
	complex	vector	h 

	h = C(H)
	_invfft(h) 
	return(allof(Im(h),0) ? Re(h) : h)
}

end