R တွင် အုပ်စုအလိုက် ရွေ့လျားပျမ်းမျှအား တွက်ချက်နည်း

အချိန်စီးရီးခွဲခြမ်းစိတ်ဖြာမှုတွင်၊ ရွေ့လျားပျမ်းမျှသည် ယခင်ကာလများ၏ ပျမ်းမျှတန်ဖိုးကို ကိုယ်စားပြုသည်။

R တွင် အုပ်စုရွေ့လျားနေသောပျမ်းမျှအား တွက်ချက်ရန် အောက်ပါအခြေခံအထားအသိုကိုသုံးနိုင်သည်။

 library (dplyr)
library (zoo)

#calculate moving average by group
df %>%
  group_by(variable1)
  mutate(moving_avg = rollmean(variable2, k= 3 , fill=NA, align=' right '))

ဤဥပမာသည် variable1 ဖြင့် အုပ်စုဖွဲ့ထားသော 3-period moving average ကို တွက်ချက်ပါသည်။

ဤကုဒ်သည် dplyr ပက်ကေ့ခ်ျမှ group_by() လုပ်ဆောင်ချက်နှင့် တိရစ္ဆာန်ရုံ ပက်ကေ့ခ်ျမှ rollmean() လုပ်ဆောင်ချက်ကို အသုံးပြုသည်။

အောက်ဖော်ပြပါ ဥပမာသည် ဤလုပ်ဆောင်ချက်ကို လက်တွေ့အသုံးချနည်းကို ပြသထားသည်။

ဥပမာ- R တွင် အုပ်စုအလိုက် ရွေ့လျားနေသော ပျမ်းမျှအား တွက်ချက်ပါ။

မတူညီသောစတိုးဆိုင်နှစ်ခုတွင် ထုတ်ကုန်တစ်ခု၏ရောင်းအားကို ရက်ဆက်တိုက်ပြသသည့် R တွင် အောက်ပါဒေတာဘောင်ရှိသည်ဆိုပါစို့။

 #create data frame
df <- data. frame (store=rep(c(' A ', ' B '), each= 7 ),
                 sales=c(4, 4, 3, 5, 6, 5, 7, 4, 8, 7, 2, 5, 4, 6))

#view data frame
df

   blind sales
1 to 4
2 to 4
3 to 3
4 to 5
5 to 6
6 to 5
7 to 7
8 B 4
9 B 8
10 B 7
11 B 2
12 B 5
13 B 4
14 B 6

စတိုးဆိုင်တစ်ခုစီအတွက် 3 ရက်ကြာ ရွေ့လျားနေသော ပျမ်းမျှရောင်းအားတန်ဖိုးကိုပြသသည့် moving_avg3 ဟုခေါ်သော ကော်လံအသစ်တစ်ခုဖန်တီးရန် အောက်ပါအထားအသိုကို ကျွန်ုပ်တို့အသုံးပြုနိုင်သည်-

 library (dplyr)
library (zoo)

#calculate 3-day moving average of sales, grouped by store
df %>%
  group_by(store) %>%
  mutate(moving_avg3 = rollmean(sales, k= 3 , fill=NA, align=' right '))

# A tibble: 14 x 3
# Groups: store[2]
   store sales moving_avg3
           
 1 A 4 NA   
 2 A 4 NA   
 3 to 3 3.67
 4 to 5 4   
 5 to 6 4.67
 6 to 5 5.33
 7 to 7 6   
 8 B 4 NA   
 9 B 8 NA   
10 B 7 6.33
11 B 2 5.67
12 B 5 4.67
13 B 4 3.67
14 B 6 5

မှတ်ချက် – rollmean() လုပ်ဆောင်ချက်ရှိ k ၏တန်ဖိုးသည် ရွေ့လျားပျမ်းမျှအား တွက်ချက်ရန် အသုံးပြုသည့် ယခင်ကာလများ၏ အရေအတွက်ကို ထိန်းချုပ်သည်။

moving_avg3 ကော်လံသည် ယခင်ကာလ 3 ခုအတွက် ရွေ့လျားနေသော ပျမ်းမျှရောင်းအားတန်ဖိုးကို ပြသသည်။

ဥပမာအားဖြင့်၊ စတိုးဆိုင် A အတွက် ပထမ 3 ရက်အတွင်း ရောင်းအား ပျမ်းမျှ အလှည့်အပြောင်းကို အောက်ပါအတိုင်း တွက်ချက်သည်-

3 ရက်ရွေ့လျားပျမ်းမျှ = (4 + 4 + 3) / 3 = 3.67

စတိုးဆိုင် A အတွက် လာမည့် 3 ရက်အတွင်း ရွေ့လျားရောင်းချမှု ပျမ်းမျှအား အောက်ပါအတိုင်း တွက်ချက်သည်-

3 ရက်ရွေ့လျားပျမ်းမျှ = (4 + 3 + 5) / 3 = 4

နောက် … ပြီးတော့။

စတိုးဆိုင်တစ်ခုစီအတွက် ပထမရွေ့လျားပျမ်းမျှတန်ဖိုးနှစ်ခုသည် NA ဖြစ်ပြီး ရွေ့လျားပျမ်းမျှအတွက် အသုံးပြုရန် ယခင်ကာလများ မလုံလောက်သောကြောင့် သတိပြုပါ။

ထပ်လောင်းအရင်းအမြစ်များ

အောက်ဖော်ပြပါ သင်ခန်းစာများသည် R တွင် အခြားဘုံအလုပ်များကို မည်သို့လုပ်ဆောင်ရမည်ကို ရှင်းပြသည်-

R တွင် ကော်လံများစွာကို ဘယ်လိုဆွဲမလဲ။
R တွင် ကော်လံများထက် ပျမ်းမျှနည်း
R တွင် အုပ်စုအလိုက် ပျမ်းမျှတွက်နည်း