Итак, у меня есть пример данных, которые мне нужно сделать с БПФ и затем отобразить результат. Я искал, как построить FFT в R, но ничего не нашел. обратите внимание, что существуют также мнимые значения, так как мне с ними бороться? У меня нет опыта в обработке сигналов, так как мне нужно только выполнить часть программирования
Пример данных очень большой, это строка значений, разделенных символом «#»
Я не буду добавлять образец данных, так как он очень большой и заполнит страницу> Итак, остальная часть кода.
a<-strsplit(string, '#')
b <- as.numeric(unlist(a))
x<-fft(b)
library(tcltk)
windows()
t <- 1:length(x) # 1 second sample
plot(t, x, type = "l")
#lines(t, col = "red")
prompt <- "hit spacebar to close plots"
extra <- "some extra comment"
capture <- tk_messageBox(message = prompt, detail = extra)