blob: 98fc87461abbb7b8b7dbaa400a96b8eb8f591a5f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
function y = idst1(x,varargin)
//This function computes the inverse type I discrete sine transform.
//Calling Sequence
//Y = idst(X)
//Y = idst(X, N)
//Parameters
//X: Matrix or integer
//N: If N is given, then X is padded or trimmed to length N before computing the transform.
//Description
//This function computes the inverse type I discrete sine transform of Y. If N is given, then Y is padded or trimmed to length N before computing the transform. If Y is a matrix, compute the transform along the columns of the the matrix.
//Examples
//idst([1,3,6])
//ans =
// 3.97487 -2.50000 0.97487
funcprot(0);
rhs=argn(2);
if(rhs<1 | rhs>2) then
error("Wrong number of input arguments.");
end
select(rhs)
case 1 then
y=callOctave("idst",x);
case 2 then
y=callOctave("idst",x,varargin(1));
end
endfunction
|
