كيفية الانضمام إلى إطارات بيانات متعددة باستخدام dplyr

في كثير من الأحيان، قد تكون مهتمًا بضم إطارات بيانات متعددة في R. ولحسن الحظ، من السهل القيام بذلك باستخدام الدالة left_join() من الحزمة dplyr .

 library(dplyr)

على سبيل المثال، لنفترض أن لدينا إطارات البيانات الثلاثة التالية:

 #create data frame
df1 <- data.frame(a = c('a', 'b', 'c', 'd', 'e', 'f'),
                  b = c(12, 14, 14, 18, 22, 23))

df2 <- data.frame(a = c('a', 'a', 'a', 'b', 'b', 'b'),
                  c = c(23, 24, 33, 34, 37, 41))

df3 <- data.frame(a = c('d', 'e', 'f', 'g', 'h', 'i'),
                  d = c(23, 24, 33, 34, 37, 41))

لربط إطارات البيانات الثلاثة معًا، يمكننا ببساطة إجراء ربطين يساريين، واحدًا تلو الآخر:

 #join the three data frames
df1 %>%
    left_join (df2, by='a') %>%
    left_join (df3, by='a')

   abcd
1 to 12 23 NA
2 to 12 24 NA
3 to 12 33 NA
4 b 14 34 NA
5 b 14 37 NA
6 b 14 41 NA
7 c 14 NA NA
8 d 18 NA 23
9th 22 NA 24
10 f 23 NA 33

لاحظ أنه يمكنك أيضًا حفظ نتيجة هذا الارتباط كإطار بيانات:

 #join the three data frames and save result as new data frame named all_data
all_data <- df1 %>%
              left_join (df2, by='a') %>%
              left_join (df3, by='a')

#view summary of resulting data frame
glimpse(all_data)

Comments: 10
Variables: 4
$ a <chr> "a", "a", "a", "b", "b", "b", "c", "d", "e", "f"
$b<dbl> 12, 12, 12, 14, 14, 14, 14, 18, 22, 23
$ c <dbl> 23, 24, 33, 34, 37, 41, NA, NA, NA, NA
$ d <dbl> NA, NA, NA, NA, NA, NA, NA, 23, 24, 33

مصادر إضافية

كيفية تصفية الصفوف في R
كيفية إزالة الخطوط المكررة في R
كيفية تجميع وتلخيص البيانات في R