r - R中的局部平滑

Question

我正在努力清理我的数据。我有大量的反射曲线，从中心到角落变得非常嘈杂。从 1000 到 1950nm 的区域通常非常干净，但是从 1000 到 350 以及从 1950 到 2500 时，我得到的噪音水平越来越高。这里是几条曲线的例子：

我尝试了一系列不同的平滑方法，如 loeless、移动平均和 SavinzkyGolay，但问题是，如果我尝试增加平滑因子以平滑噪声部分，那么干净部分也会受到影响。
这是我迄今为止获得的最好结果：

如您所见，嘈杂的部分还不平滑。然而，进一步的平滑也将平滑中心部分。
R中是否有任何包可以仅在本地消除噪音以获得类似的东西？

这是我的数据的一个子集。对不起，即使是一条曲线也是很多点，所以我不能以任何其他方式在这里发布！

标签： rfilteringnoisesmoothingloess

Answer 1

两个想法；您可以将平滑功能仅应用于嘈杂的部分吗？

是否可以设置高阈值和低阈值，并简单地排除或删除所有高于和低于的结果？