long: other way to define matched filter

This commit is contained in:
Bastian Bloessl
2015-05-22 18:03:27 +02:00
parent 6fb8a97cfd
commit 33a75673b2
2 changed files with 23 additions and 23 deletions
+2
View File
@@ -16,6 +16,8 @@ sym <- c(1, 1, -1, -1, 1, 1, -1, 1, -1, 1, 1, 1, 1, 1, 1, -1, -1, 1, 1, -1, 1, -
freq <- c(rep(0, 6), sym, rep(0, 5))
pre <- fft(fft.shift(freq), inverse=T) / sqrt(52)
pre <- Conj(pre)
pre <- rev(pre)
for(i in seq(1, 64, 4)) {