كيفية إضافة صف إجمالي إلى إطار البيانات في r
يمكنك استخدام الطرق التالية لإضافة صف “إجمالي” إلى أسفل إطار البيانات في R:
الطريقة الأولى: استخدم Base R
rbind(df, data. frame (team=' Total ', t(colSums(df[, -1]))))
الطريقة الثانية: استخدم dplyr
library (dplyr) df %>% bind_rows(summarize(., across(where(is.numeric), sum), across(where(is.character), ~' Total ')))
يوضح المثال التالي كيفية استخدام كل طريقة عمليًا مع إطار البيانات التالي:
#create data frame df <- data. frame (team=c('A', 'B', 'C', 'D', 'E', 'F'), assists=c(5, 7, 7, 9, 12, 9), rebounds=c(11, 8, 10, 6, 6, 5), blocks=c(6, 6, 3, 2, 7, 9)) #view data frame df team assists rebound blocks 1 to 5 11 6 2 B 7 8 6 3 C 7 10 3 4 D 9 6 2 5 E 12 6 7 6 F 9 5 9
مثال 1: إضافة صف إجمالي باستخدام القاعدة R
يمكننا استخدام وظائف rbind و colSums لقاعدة R لإضافة صف إجمالي في أسفل إطار البيانات:
#add total row to data frame df_new <- rbind(df, data. frame (team=' Total ', t(colSums(df[, -1])))) #view new data frame df_new team assists rebound blocks 1 to 5 11 6 2 B 7 8 6 3 C 7 10 3 4 D 9 6 2 5 E 12 6 7 6 F 9 5 9 7 Total 49 46 33
لاحظ أنه تمت إضافة صف إلى أسفل إطار البيانات يعرض مجموع القيم في كل عمود.
مثال 2: إضافة صف إجمالي باستخدام dplyr
يوضح التعليمة البرمجية التالية كيفية استخدام وظائف حزمة dplyr في R لإضافة صف إجمالي إلى أسفل إطار البيانات:
library (dplyr) #add total row to data frame df_new <- df %>% bind_rows(summarize(., across(where(is.numeric), sum), across(where(is.character), ~' Total '))) #view new data frame df_new team assists rebound blocks 1 to 5 11 6 2 B 7 8 6 3 C 7 10 3 4 D 9 6 2 5 E 12 6 7 6 F 9 5 9 7 Total 49 46 33
لاحظ أنه تمت إضافة صف إلى أسفل إطار البيانات يعرض مجموع القيم في كل عمود.
لاحظ أيضًا أن هذه الطريقة تنتج نفس النتائج مثل طريقة R الأساسية.
مصادر إضافية
تشرح البرامج التعليمية التالية كيفية تنفيذ المهام الشائعة الأخرى في R:
كيفية استخدام rbind في R
كيفية حذف الخطوط في R
كيفية حساب الفرق بين الصفوف في R