blob: 39ef91f48a9e562fc20b6f53087d1aba251a4264 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
function [d]=dftmtx(n)
// Computes Discrete n-by-n Fourier transformation matrix
// Calling Sequence
// [d]=dftmtx(n)
// Parameters
// n: Real positive scalar number
// Description
// This is an Octave function
// This fuction gives a complex matrix of values whose product with a vector produces the discrete Fourier transform. This can also be achieved by directly using the fft function i.e. y=fft(x) is same as y=A*x where A=dftmtx(n).
// Examples
// 1. dftmtx(3)
// ans = 1.00000 + 0.00000i 1.00000 + 0.00000i 1.00000 + 0.00000i
// 1.00000 + 0.00000i -0.50000 - 0.86603i -0.50000 + 0.86603i
// 1.00000 - 0.00000i -0.50000 + 0.86603i -0.50000 - 0.86603i
funcprot(0);
rhs=argn(2);
if (rhs<1) then
error("Wrong number of input arguments.")
else d= callOctave("dftmtx",n)
end
endfunction
|