كيفية تطبيق دالة على كل صف من المصفوفة أو إطار البيانات في r

يمكنك استخدام الدالة application() لتطبيق دالة على كل صف من المصفوفة أو إطار البيانات في R.

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

تطبيق (X، الهامش، المرح)

ذهب:

• X: اسم المصفوفة أو كتلة البيانات.
• الهامش: البعد الذي سيتم تنفيذ العملية عليه. استخدم 1 للصف، 2 للعمود.
• FUN: الوظيفة المراد تطبيقها.

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

مثال 1: تطبيق دالة على كل صف من المصفوفة

لنفترض أن لدينا المصفوفة التالية في R:

 #create matrix
mat <- matrix(1:15, nrow= 3 )

#view matrix
mast

     [,1] [,2] [,3] [,4] [,5]
[1,] 1 4 7 10 13
[2,] 2 5 8 11 14
[3,] 3 6 9 12 15

يمكننا استخدام الدالة application() لتطبيق وظائف مختلفة على صفوف المصفوفة:

 #find mean of each row
apply(mat, 1, mean)

[1] 7 8 9

#find sum of each row
apply(mat, 1, sum)

[1] 35 40 45

#find standard deviation of each row
apply(mat, 1, sd)

[1] 4.743416 4.743416 4.743416

#multiply the value in each row by 2 (using t() to transpose the results)
t(apply(mat, 1, function (x) x * 2))

     [,1] [,2] [,3] [,4] [,5]
[1,] 2 8 14 20 26
[2,] 4 10 16 22 28
[3,] 6 12 18 24 30

#normalize every row to 1 (using t() to transpose the results)
t(apply(mat, 1, function (x) x / sum(x) ))

           [,1] [,2] [,3] [,4] [,5]
[1,] 0.02857143 0.1142857 0.2 0.2857143 0.3714286
[2,] 0.05000000 0.1250000 0.2 0.2750000 0.3500000
[3,] 0.06666667 0.1333333 0.2 0.2666667 0.3333333

لاحظ أنه إذا كنت تريد العثور على المتوسط أو مجموع كل صف، فمن الأسرع استخدام الدالتين المضمنتين RowMeans() أو RowSums() :

 #find mean of each row
rowMeans(mat)

[1] 7 8 9

#find sum of each row
rowSums(mat)

[1] 35 40 45

مثال 2: تطبيق دالة على كل صف من إطار البيانات

لنفترض أن لدينا المصفوفة التالية في R:

 #create data frame
df <- data. frame (var1=1:3,
                 var2=4:6,
                 var3=7:9,
                 var4=10:12,
                 var5=13:15)

#view data frame
df

  var1 var2 var3 var4 var5
1 1 4 7 10 13
2 2 5 8 11 14
3 3 6 9 12 15

يمكننا استخدام الدالة application() لتطبيق وظائف مختلفة على صفوف إطار البيانات:

 #find mean of each row
apply(df, 1, mean)

[1] 7 8 9

#find sum of each row
apply(df, 1, sum)

[1] 35 40 45

#find standard deviation of each row
apply(df, 1, sd)

[1] 4.743416 4.743416 4.743416

#multiply the value in each row by 2 (using t() to transpose the results)
t(apply(df, 1, function (x) x * 2))

     var1 var2 var3 var4 var5
[1,] 2 8 14 20 26
[2,] 4 10 16 22 28
[3,] 6 12 18 24 30

#normalize every row to 1 (using t() to transpose the results)
t(apply(df, 1, function (x) x / sum(x) ))

           var1 var2 var3 var4 var5
[1,] 0.02857143 0.1142857 0.2 0.2857143 0.3714286
[2,] 0.05000000 0.1250000 0.2 0.2750000 0.3500000
[3,] 0.06666667 0.1333333 0.2 0.2666667 0.3333333

كما هو الحال مع المصفوفات، إذا كنت تريد العثور على المتوسط أو مجموع كل صف، فمن الأسرع استخدام الدالتين المضمنتين RowMeans() أو RowSums() :

 #find mean of each row
rowMeans(df)

[1] 7 8 9

#find sum of each row
rowSums(df)

[1] 35 40 45

مصادر إضافية

كيفية استرداد أرقام الأسطر في R
كيفية تشغيل وظيفة COUNTIF في R
كيفية تشغيل دالة SUMIF في R