Mutate() နှင့် case_when() ဖြင့် r တွင် variable အသစ်များကိုဖန်တီးပါ။

မကြာခဏဆိုသလို သင်သည် အချို့သောအခြေအနေများအပေါ်အခြေခံ၍ R ရှိ ဒေတာဘောင်တစ်ခုတွင် ကိန်းရှင်အသစ်တစ်ခုကို ဖန်တီးလိုပေမည်။ ကံကောင်းထောက်မစွာ၊ ၎င်းသည် dplyr package မှ mutate() နှင့် case_when() လုပ်ဆောင်ချက်များကို အသုံးပြု၍ လုပ်ဆောင်ရန် လွယ်ကူသည်။

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

 #create data frame
df <- data.frame(player = c('a', 'b', 'c', 'd', 'e'),
                 position = c('G', 'F', 'F', 'G', 'G'),
                 points = c(12, 15, 19, 22, 32),
                 rebounds = c(5, 7, 7, 12, 11))

#view data frame
df

  player position points rebounds
1 to G 12 5
2 b F 15 7
3 c F 19 7
4 d G 22 12
5th G 32 11

ဥပမာ 1- ရှိပြီးသား variable ကိုအခြေခံ၍ variable အသစ်တစ်ခုဖန်တီးပါ။

အောက်ပါ ကုဒ်သည် အမှတ်များ ကော်လံရှိ တန်ဖိုးအပေါ် အခြေခံ၍ “ scorer” ဟုခေါ်သော ကိန်းရှင်အသစ်ကို ဖန်တီးနည်းကို ပြသသည်-

 library(dplyr)

#define new variable 'scorer' using mutate() and case_when()
df %>%
  mutate (scorer = case_when (points < 15 ~ ' low ',
                           points < 25 ~ ' med ',
                           points < 35 ~ ' high '))

  player position points rebounds scorer
1 a G 12 5 low
2 b F 15 7 med
3 c F 19 7 med
4 d G 22 12 med
5th G 32 11 high

ဥပမာ 2- ရှိပြီးသား ကိန်းရှင်များစွာကို အခြေခံ၍ ကိန်းရှင်အသစ်တစ်ခု ဖန်တီးပါ။

အောက်ပါကုဒ်သည် ပလေယာနှင့် ရာထူးကော်လံရှိ တန်ဖိုးအပေါ် အခြေခံ၍ “ အမျိုးအစား” ဟုခေါ်သော ကိန်းရှင်အသစ်ကို ဖန်တီးနည်းကို ပြသသည်-

 library(dplyr)

#define new variable 'type' using mutate() and case_when()
df %>%
  mutate (type = case_when (player == 'a' | player == 'b' ~ ' starter ',
                            player == 'c' | player == 'd' ~ ' backup ',
                            position == 'G' ~ ' reserve '))

  player position points rebounds type
1 a G 12 5 starter
2 b F 15 7 starter
3 c F 19 7 backup
4 d G 22 12 backup
5th G 32 11 reserve

အောက်ဖော်ပြပါ ကုဒ်သည် အမှတ်များ၏တန်ဖိုးနှင့် ကော်လံများကို ပြန်လှန်သည့်တန်ဖိုးအပေါ် အခြေခံ၍ “ valueAdded” ဟုခေါ်သော ကိန်းရှင်အသစ်ကို မည်သို့ဖန်တီးရမည်ကို ပြသသည်-

 library(dplyr)

#define new variable 'valueAdded' using mutate() and case_when()
df %>%
  mutate (valueAdded = case_when (points <= 15 & rebounds <=5 ~ 2,
                                points <=15 & rebounds > 5 ~ 4,
                                points < 25 & rebounds < 8 ~ 6,
                                points < 25 & rebounds > 8 ~ 7,
                                points >=25 ~ 9))

  player position points rebounds valueAdded
1 to G 12 5 2
2 b F 15 7 4
3c F 19 7 6
4 d G 22 12 7
5th G 32 11 9

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

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