spencer.m File Reference

Functions
	if (isvector(X)) n
	retval (15:n,:)
	zeros (7, c)
Variables
function	retval
	endif [xr, xc] = size(X)
	n = xr
	c = xc
	X = reshape(X, n, 1)
endif	W = [-3, -6, -5, 3, 21, 46, 67, 74, 67, 46, 21, 3, -5, -6, -3] / 320

---

Function Documentation

if

(

isvector(X)

)

retval	(	15:n	,
		:
	)

zeros	(	7	,
		c
	)

---

Variable Documentation

c = xc

endif[xr, xc] = size(X)

n = xr

retval

Initial value:

 spencer (X)

  if (nargin != 1)
    print_usage ()

endif W = [-3, -6, -5, 3, 21, 46, 67, 74, 67, 46, 21, 3, -5, -6, -3] / 320

X = reshape(X, n, 1)