如何从R中的数据数组中删除异常值

Question

我想找到并删除测量中的异常值，并用平滑值替换以更好地捕捉趋势。请查看下面的图Data with outliers

Answer 1

您需要smooth函数。

示例：

y = seq(61,68,0.5)
x = 1:15
y[7]= 59

D = data.frame(x,y)
ys = smooth(y)
Ds = data.frame(x,ys)

par(mfrow=c(1,2))
plot(D, type="b", main="Original Data")
plot(Ds, type="b", main="Smoothed Data")