Identifiera flera anomalier i säsongsbaserade tidsserier

Introduktion till avvikelsedetektering i R

Alastair Rushworth

Data Scientist

Månadsvis intäktsdata

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' test passar inte här

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

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

Argument

x: vektor med värden
period: periodens längd för det upprepande mönstret
direction: hitta anomalier som är små ('neg'), stora ('pos') eller båda ('both')

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)

Introduktion till avvikelsedetektering i R