powered by
Forward fourier Transform
FRWDft(g, n, tstart, dt)
input signal
number of points
start of trace
sample interval, s
fourier compnents
frequency vector
time vector
INVRft
# NOT RUN { zil <- rnorm(300) fss <- FRWDft( zil, length(zil), 0, 0.004) # }
Run the code above in your browser using DataLab