R တွင် အုပ်စုပျမ်းမျှအား တွက်ချက်နည်း (ဥပမာများဖြင့်)

မကြာခဏဆိုသလို သင်သည် R တွင် အုပ်စုပျမ်းမျှကို တွက်ချက်လိုပေမည်။ ၎င်းကိုလုပ်ဆောင်ရန် နည်းလမ်းသုံးခုကို သင်သုံးနိုင်သည်-

နည်းလမ်း 1- R base ကိုသုံးပါ။

 aggregate(df$col_to_aggregate, list(df$col_to_group_by), FUN= mean )

နည်းလမ်း 2- dplyr() package ကိုသုံးပါ။

 library (dplyr)

df %>%
  group_by (col_to_group_by) %>%
  summarise_at (vars(col_to_aggregate), list(name = mean ))

နည်းလမ်း 3- data.table package ကိုသုံးပါ။

 library (data.table)

dt[ ,list(mean= mean (col_to_aggregate)), by=col_to_group_by]

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

နည်းလမ်း 1- R အခြေခံကို အသုံးပြု၍ အုပ်စုတစ်ခုလျှင် ပျမ်းမျှကို တွက်ချက်ပါ။

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

 #create data frame
df <- data.frame(team=c('a', 'a', 'b', 'b', 'b', 'c', 'c'),
                 pts=c(5, 8, 14, 18, 5, 7, 7),
                 rebs=c(8, 8, 9, 3, 8, 7, 4))

#view data frame
df

  team pts rebs
1 to 5 8
2 to 8 8
3 b 14 9
4 b 18 3
5 b 5 8
6 c 7 7
7 c 7 4

#find mean points scored by team
aggregate(df$pts, list(df$team), FUN= mean )

  Group.1 x
1 to 6.50000
2 b 12.33333
3 to 7.00000

နည်းလမ်း 2- dplyr ကို အသုံးပြု၍ အုပ်စုတစ်ခုလျှင် ပျမ်းမျှကို တွက်ချက်ပါ။

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

 library (dplyr)

#create data frame
df <- data.frame(team=c('a', 'a', 'b', 'b', 'b', 'c', 'c'),
                 pts=c(5, 8, 14, 18, 5, 7, 7),
                 rebs=c(8, 8, 9, 3, 8, 7, 4))

#find mean points scored by team
df %>%
group_by (team) %>%
summarise_at (vars(pts), list(name = mean ))

# A tibble: 3 x 2
  team name
  <fct> <dbl>
1 to 6.5
2 b 12.3
3 v 7

နည်းလမ်း 3- data.table ကိုသုံးပြီး အုပ်စုအလိုက် ပျမ်းမျှတွက်ချက်ပါ။

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

 library (data.table)

#create data frame
df <- data.frame(team=c('a', 'a', 'b', 'b', 'b', 'c', 'c'),
                 pts=c(5, 8, 14, 18, 5, 7, 7),
                 rebs=c(8, 8, 9, 3, 8, 7, 4))

#convert data frame to data table 
setDT(df)

#find mean points scored by team
df[,list(mean= mean (pts)), by=team]

   team mean
1: to 6.50000
2:b12.33333
3: c 7.00000

နည်းလမ်းသုံးခုစလုံးသည် တူညီသောရလဒ်များကို ပြန်လာသည်ကို သတိပြုပါ။

ဆက်စပ်- R တွင် Mean Function အတွက် လမ်းညွှန်ချက်

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

R တွင် အုပ်စုအလိုက် ပေါင်းစည်းနည်း
R တွင် အုပ်စုအလိုက် အရေအတွက် တွက်ချက်နည်း