r - 有没有办法对R中的功能数据进行傅里叶基础平滑

Question

在计算相异矩阵之前，我想在 R 中使用傅立叶基础来平滑我的模拟函数数据。这是我到目前为止所做的

library(fda)
library(fad.usc)
x<-fdata(func.obs)
y<-create.fourier.basis(rangeval = range(x),nbasis = 50)
z<-smooth.basis(y)

以下是我的模拟数据的部分结果。

> func.obs[1:5,1:5]
 [,1]      [,2]      [,3]      [,4]       [,5]
[1,]  1.5 1.7818424 1.2107282 1.0486646  1.2890734
[2,]  1.5 1.8585156 0.7269540 3.3554564 -0.1634684
[3,]  1.5 0.6231975 2.0778415 0.8234746  1.5967294
[4,]  1.5 2.1215671 0.3158835 2.4765020  0.2244624
[5,]  1.5 2.7281892 0.7679411 1.5414498  1.0882794

我在做正确的事吗？如果不是，我该怎么做？

标签： rstatisticssignal-processing