R တွင် အလေးချိန်စံသွေဖည်မှုကို တွက်ချက်နည်း

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

အလေးချိန်စံသွေဖည်မှုကို တွက်ချက်ရန်အတွက် ဖော်မြူလာမှာ-

ရွှေ-

• N- လေ့လာတွေ့ရှိချက် စုစုပေါင်းအရေအတွက်
• M- သုညမဟုတ်သော အလေးအရေအတွက်
• w _i : အလေးချိန် vector တစ်ခု
• x _i : ဒေတာတန်ဖိုးများ၏ vector တစ်ခု
• x : အလေးချိန်ပျမ်းမျှ

R တွင် အလေးချိန် စံသွေဖည်မှုကို တွက်ချက်ရန် အလွယ်ဆုံးနည်းလမ်းမှာ အောက်ပါ syntax ကိုအသုံးပြုသည့် Hmisc ပက်ကေ့ခ်ျမှ wt.var() လုပ်ဆောင်ချက်ကို အသုံးပြုခြင်းဖြစ်သည်။

 #define data values
x <- c(4, 7, 12, 13, ...)

#define weights
wt <- c(.5, 1, 2, 2, ...)

#calculate weighted variance
weighted_var <- wtd. var (x, wt)

#calculate weighted standard deviation
weighted_sd <- sqrt(weighted_var)

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

ဥပမာ 1- vector တစ်ခုအတွက် စံသွေဖည်မှုကို ချိန်ညှိထားသည်။

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

 library (Hmisc)

#define data values 
x <- c(14, 19, 22, 25, 29, 31, 31, 38, 40, 41)

#define weights
wt <- c(1, 1, 1.5, 2, 2, 1.5, 1, 2, 3, 2)

#calculate weighted variance 
weighted_var <- wtd. var (x, wt)

#calculate weighted standard deviation
sqrt(weighted_var)

[1] 8.570051

တွက်ဆထားသော စံသွေဖည်မှုသည် 8.57 ဖြစ်လာသည်။

ဥပမာ 2- ဒေတာဘောင်ရှိ ကော်လံအတွက် စံသွေဖည်မှုကို ချိန်ညှိထားသည်။

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

 library (Hmisc)

#define data frame
df <- data. frame (team=c('A', 'A', 'A', 'A', 'A', 'B', 'B', 'C'),
                 wins=c(2, 9, 11, 12, 15, 17, 18, 19),
                 dots=c(1, 2, 2, 2, 3, 3, 3, 3))

#define weights
wt <- c(1, 1, 1.5, 2, 2, 1.5, 1, 2)

#calculate weighted standard deviation of points
sqrt(wtd. var (df$points, wt))

[1] 0.6727938

အမှတ်များ ကော်လံအတွက် အလေးချိန် စံသွေဖည်မှုသည် 0.673 ဖြစ်လာသည်။

ဥပမာ 3- ဒေတာဘောင်တစ်ခုရှိ ကော်လံများစွာအတွက် စံသွေဖည်မှုကို ချိန်ညှိထားသည်။

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

 library (Hmisc)

#define data frame
df <- data. frame (team=c('A', 'A', 'A', 'A', 'A', 'B', 'B', 'C'),
                 wins=c(2, 9, 11, 12, 15, 17, 18, 19),
                 dots=c(1, 2, 2, 2, 3, 3, 3, 3))

#define weights
wt <- c(1, 1, 1.5, 2, 2, 1.5, 1, 2)

#calculate weighted standard deviation of points and wins
sapply(df[c(' wins ', ' points ')], function(x) sqrt(wtd. var (x, wt)))

     win points 
4.9535723 0.6727938 

အနိုင်ရကော်လံအတွက် တွက်ဆထားသော စံသွေဖည်မှုသည် 4.954 ဖြစ်ပြီး အမှတ်ကော်လံအတွက် တွက်ဆထားသော စံသွေဖည်မှုသည် 0.673 ဖြစ်သည်။

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

Excel တွင် Weighted Standard Deviation ကို တွက်ချက်နည်း
R တွင် စံသွေဖည်တွက်ချက်နည်း
R ၏ ကွဲလွဲမှု ကိန်းဂဏာန်းကို တွက်ချက်နည်း
R တွင် အကွာအဝေး တွက်ချက်နည်း