Skip to main content

Browse the archive

https://github.com/cran/ltsa
21 January 2021, 21:54:35 UTC
Revision d1a312e52f8273b90b43b27e3e97d500010fb403 authored by A.I. McLeod on 30 October 2007, 16:55:48 UTC, committed by cran-robot on 30 October 2007, 16:55:48 UTC 
version 1.0
0 parent
Raw File
Tip revision: d1a312e52f8273b90b43b27e3e97d500010fb403 authored by A.I. McLeod on 30 October 2007, 16:55:48 UTC
version 1.0
Tip revision: d1a312e
trenchDet.c 
// Determinant computation of a Toeplitz matrix

// Takes arguments r,n and v 
// Returns logDet, the logarithm of determinant

#include "trenchR.h"

double trenchDet(double *r,int n,double *v)
{
	int i;
	double logDet;
	
	logDet = 0.0;
	
	for (i = 1; i < n; i++)
		logDet += log(v[i]);

	return logDet;
}
back to top