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

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

 #add new column 'col3' with values based on columns 1 and 2
df$col3 <- with (df, ifelse (col1 > col2, value_if_true, value_if_false))

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

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

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

 #create data frame
df <- data. frame (team=c('Mavs', 'Cavs', 'Spurs', 'Nets'),
                 scored=c(99, 90, 84, 96),
                 allowed=c(95, 80, 87, 95))

#view data frame
df

   team scored allowed
1 Mavs 99 95
2 Cavs 90 80
3 Spurs 84 87
4 Nets 96 95

#add 'result' column based on values in 'scored' and 'allowed' columns
df$result <- with (df, ifelse (scored > allowed, ' Win ', ' Loss '))

#view updated data frame
df

   team scored allowed result
1 Mavs 99 95 Win
2 Cavs 90 80 Win
3 Spurs 84 87 Losses
4 Nets 96 95 Win

ويوضح التعليمة البرمجية التالية كيفية إضافة عمود حرف جديد يجمع بين وظيفتي ifelse() لإنتاج ثلاث قيم محتملة في عمود جديد:

 #create data frame
df <- data. frame (team=c('Mavs', 'Cavs', 'Spurs', 'Nets'),
                 scored=c(99, 90, 84, 96),
                 allowed=c(95, 80, 87, 95))

#view data frame
df

   team scored allowed
1 Mavs 99 95
2 Cavs 90 80
3 Spurs 84 87
4 Nets 96 95

#add 'quality' column based on values in 'scored' and 'allowed' columns
df$quality <- with (df, ifelse (scored > 95, ' great ',
                         ifelse (scored > 85, ' good ', ' bad ')))

#view updated data frame
df

   team scored allowed quality
1 Mavs 99 95 great
2 Cavs 90 80 good
3 Spurs 84 87 bad
4 Nets 96 95 great

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

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

 #create data frame
df <- data. frame (team=c('Mavs', 'Cavs', 'Spurs', 'Nets'),
                 scored=c(99, 90, 84, 96),
                 allowed=c(95, 80, 87, 95))

#view data frame
df

   team scored allowed
1 Mavs 99 95
2 Cavs 90 80
3 Spurs 84 87
4 Nets 96 95

#add 'lower_score' column based on values in 'scored' and 'allowed' columns
df$lower_score <- with (df, ifelse (scored > allowed, allowed, scored))

#view updated data frame
df

   team scored allowed lower_score
1 Mavs 99 95 95
2 Cavs 90 80 80
3 Spurs 84 87 84
4 Nets 96 95 95

مصادر إضافية

كيفية إضافة أعمدة إلى إطار البيانات في R
كيفية إضافة عمود فارغ إلى إطار البيانات في R
كيفية إضافة عمود الفهرس إلى إطار البيانات في R