Mevsimsel zaman serilerinde birden çok anomali tespiti

R ile Anomali Tespitine Giriş

Alastair Rushworth

Data Scientist

Aylık gelir verileri

head(msales)

  sales month
1 6.068     1
2 5.966     2
3 6.133     3
4 6.230     4
5 6.407     5
6 6.433     6

Grubbs testi burada uygun değil

plot(sales ~ month, data = msales, type = 'o')

library(AnomalyDetection)
sales_ad <- AnomalyDetectionVec(x = msales$sales, period = 12, 
                                direction = 'both')

Argümanlar

x: değer vektörü
period: tekrar eden desenin periyodu
direction: küçük ('neg'), büyük ('pos') ya da her ikisi ('both') olan anomalileri bul

sales_ad <- AnomalyDetectionVec(x = msales$sales, period = 12, 
                                direction = 'both')

sales_ad$anoms

  index anoms
1    14 1.561
2   108 2.156

AnomalyDetectionVec(x = msales$sales, period = 12, 
                    direction = 'both', plot = T)

R ile Anomali Tespitine Giriş