R में wmape की गणना कैसे करें (उदाहरण के साथ)

किसी मॉडल की पूर्वानुमान सटीकता को मापने के लिए सबसे अधिक उपयोग की जाने वाली मीट्रिक में से एक WMAPE है, जो भारित औसत पूर्ण प्रतिशत त्रुटि के लिए है।

WMAPE की गणना करने का सूत्र है:

WMAPE = (Σ|y _i – ŷ _i |*w _i ) / (Σy _i *w _i ) * 100

सोना:

• Σ – एक प्रतीक जिसका अर्थ है “योग”
• y _i – ^ith अवलोकन का वास्तविक मूल्य
• ŷ _i – i ^वें अवलोकन का अनुमानित मूल्य
• w _i – i ^वें अवलोकन का भार

हम R में WMAPE की गणना करने के लिए निम्नलिखित फ़ंक्शन को परिभाषित कर सकते हैं:

 find_WMAPE <- function (y, yhat, w){
  return (sum(abs(y-yhat)*w)/sum(y*w)*100)
}

निम्नलिखित उदाहरण दिखाता है कि व्यवहार में इस फ़ंक्शन का उपयोग कैसे करें।

उदाहरण: आर में डब्लूएमएपीई की गणना

मान लीजिए कि हमारे पास आर में निम्नलिखित डेटा फ्रेम है जिसमें खुदरा स्टोर के लिए वास्तविक और पूर्वानुमानित बिक्री के बारे में जानकारी शामिल है:

 #create dataset
data <- data. frame (actual=c(23, 37, 44, 47, 48, 48, 46, 43, 32, 27, 26, 24),
                   forecast=c(37, 40, 46, 44, 46, 50, 45, 44, 34, 30, 22, 23))

#view dataset
data

   current forecast
1 23 37
2 37 40
3 44 46
4 47 44
5 48 46
6 48 50
7 46 45
8 43 44
9 32 34
10 27 30
11 26 22
12 24 23

वास्तविक और पूर्वानुमानित बिक्री के बीच अंतर के लिए WMAPE की गणना करने के लिए, हम उपयोग करने के लिए वज़न के एक वेक्टर को परिभाषित कर सकते हैं, फिर WMAPE फ़ंक्शन का उपयोग करें जिसे हमने पहले परिभाषित किया था:

 #define function to calculate WMAPE
find_WMAPE <- function (y, yhat, w){
  return (sum(abs(y-yhat)*w)/sum(y*w)*100)
}

#define weights for each month
weights <- c(20, 20, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6)

#calculate WMAPE
find_WMAPE(df$actual, df$predicted, weights)

[1] 13.27635

इस मॉडल का WMAPE 13.27635% निकला।

अर्थात्, अनुमानित बिक्री मूल्यों और वास्तविक बिक्री मूल्यों के बीच भारित औसत पूर्ण प्रतिशत त्रुटि 13.27635% है।

ध्यान दें कि हमने इस उदाहरण में जनवरी और फरवरी के मूल्यों को बहुत अधिक महत्व दिया है।

आपकी विशेष समस्या के आधार पर, आप अपने मॉडल में प्रत्येक त्रुटि के महत्व के आधार पर विभिन्न अवलोकनों को अधिक या कम महत्व दे सकते हैं।

अतिरिक्त संसाधन

निम्नलिखित ट्यूटोरियल बताते हैं कि आर में अन्य सामान्य कार्य कैसे करें:

आर में एमएपीई की गणना कैसे करें
R में SMAPE की गणना कैसे करें
आर में आरएमएसई की गणना कैसे करें