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

يمكنك استخدام الدالة mutate() ‎ لحزمة dplyr لإضافة عمود واحد أو أكثر إلى إطار البيانات في R.

تستخدم هذه الوظيفة بناء الجملة الأساسي التالي:

الطريقة الأولى: إضافة عمود في نهاية إطار البيانات

 df %>%
mutate (new_col=c(1, 3, 3, 5, 4))

الطريقة الثانية: إضافة عمود قبل عمود معين

 df %>%
mutate (new_col=c(1, 3, 3, 5, 4),
        .before=col_name)

الطريقة الثالثة: إضافة عمود بعد عمود معين

 df %>%
mutate (new_col=c(1, 3, 3, 5, 4),
        .after=col_name)

الطريقة الرابعة: إضافة عمود بناءً على أعمدة أخرى

 df %>%
mutate (new_col= if_else (.$col_name > 10, ' A ', ' B '))

توضح الأمثلة التالية كيفية استخدام بناء الجملة هذا عمليًا مع إطار البيانات التالي:

 #create data frame
df <- data. frame (team=c('A', 'A', 'A', 'A', 'B', 'B', 'B', 'B'),
                 points=c(12, 14, 19, 24, 24, 22, 30, 9),
                 assists=c(4, 6, 6, 8, 3, 7, 8, 11))

#view data frame
df

  team points assists
1 to 12 4
2 to 14 6
3 To 19 6
4 to 24 8
5 B 24 3
6 B 22 7
7 B 30 8
8 B 9 11

مثال 1: أضف عمودًا في نهاية إطار البيانات

يوضح التعليمة البرمجية التالية كيفية إضافة عمود إلى نهاية إطار البيانات:

 #add 'blocks' column at end of data frame
df <- df %>%
        mutate (blocks=c(1, 3, 3, 2, 4, 3, 6, 2))

#view data frame
df

  team points assists blocks
1 to 12 4 1
2 A 14 6 3
3 A 19 6 3
4 A 24 8 2
5 B 24 3 4
6 B 22 7 3
7 B 30 8 6
8 B 9 11 2

لاحظ أنه يمكنك إضافة عمود فارغ ببساطة عن طريق تعيين NA لكل قيمة في العمود الجديد:

 #add empty column at end of data frame
df <- df %>%
        mutate (blocks=NA)

#view data frame
df

  team points assists blocks
1 A 12 4 NA
2 A 14 6 NA
3 A 19 6 NA
4 A 24 8 NA
5 B 24 3 NA
6 B 22 7 NA
7 B 30 8 NA
8 B 9 11 NA

مثال 2: إضافة عمود قبل عمود معين

يوضح التعليمة البرمجية التالية كيفية إضافة عمود قبل عمود معين في إطار البيانات:

 #add 'blocks' column before 'points' column
df <- df %>%
        mutate (blocks=c(1, 3, 3, 2, 4, 3, 6, 2),
              .before=points)

#view data frame
df

  team blocks points assists
1 A 1 12 4
2 to 3 14 6
3 A 3 19 6
4 A 2 24 8
5 B 4 24 3
6 B 3 22 7
7 B 6 30 8
8 B 2 9 11

مثال 3: إضافة عمود بعد عمود معين

يوضح التعليمة البرمجية التالية كيفية إضافة عمود بعد عمود معين في إطار البيانات:

 #add 'blocks' column after 'points' column
df <- df %>%
        mutate (blocks=c(1, 3, 3, 2, 4, 3, 6, 2),
              .after=points)

#view data frame
df

  team points blocks assists
1 to 12 1 4
2 A 14 3 6
3 A 19 3 6
4 A 24 2 8
5 B 24 4 3
6 B 22 3 7
7 B 30 6 8
8 B 9 2 11

المثال 4: إضافة عمود بناءً على أعمدة أخرى

يوضح التعليمة البرمجية التالية كيفية إضافة عمود بناءً على عمود آخر في إطار البيانات:

 #add 'status' column whose values depend on value in 'points' column
df <- df %>%
        mutate (status= if_else (.$points > 20, ' Good ', ' Bad '))

#view data frame
df

  team points assists status
1 A 12 4 Bad
2 A 14 6 Bad
3 A 19 6 Bad
4 A 24 8 Good
5 B 24 3 Good
6 B 22 7 Good
7 B 30 8 Good
8 B 9 11 Bad

مصادر إضافية

تشرح البرامج التعليمية التالية كيفية تنفيذ وظائف شائعة أخرى في dplyr:

كيفية إعادة تسمية عمود حسب موضع الفهرس باستخدام dplyr
كيفية تحديد الأعمدة حسب الفهرس باستخدام dplyr
كيفية حذف الصفوف باستخدام dplyr