Как удалить выбросы из массива данных в R

Question

Я хотел бы найти и удалить выброс в измерении и заменить его сглаженным значением, чтобы лучше уловить тренд. Пожалуйста, найдите рисунок ниже Данные с выбросами

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")