ج: كيفية استخدام cbind مع ناقلات ذات أطوال مختلفة

إن أبسط طريقة لاستخدام cbind في R مع نواقل ذات أطوال مختلفة هي ضبط النواقل على أطوال متساوية باستخدام الدالة length() .

يوضح المثال التالي كيفية القيام بذلك.

مثال: استخدام cbind مع ناقلات ذات أطوال مختلفة في R

لنفترض أننا نستخدم cbind لربط متجهين بأطوال مختلفة معًا في R:

 #define two vectors
vec1 <- c(3, 4, 5)
vec2 <- c(1, 6, 4, 4, 7, 6, 9, 8, 7)

#cbind the two vectors together
cbind(vec1, vec2)

      vec1 vec2
 [1,] 3 1
 [2,] 4 6
 [3,] 5 4
 [4,] 3 4
 [5,] 4 7
 [6,] 5 6
 [7,] 3 9
 [8,] 4 8
 [9,] 5 7

تعمل وظيفة cbind مع كلا المتجهين، لكن لاحظ أن قيم المتجه الأول تتكرر مرارًا وتكرارًا.

وهذا ما يسمى “إعادة التدوير” في R.

لملء القيم المفقودة للمتجه الأقصر بقيم NA، يمكنك استخدام الصيغة التالية:

 #define two vectors
vec1 <- c(3, 4, 5)
vec2 <- c(1, 6, 4, 4, 7, 6, 9, 8, 7)

#calculate max length of vectors
max_length <- max(length(vec1), length(vec2))

#set length of each vector equal to max length
length(vec1) <- max_length                      
length(vec2) <- max_length 

#cbind the two vectors together
cbind(vec1, vec2)

      vec1 vec2
 [1,] 3 1
 [2,] 4 6
 [3,] 5 4
 [4,] NA 4
 [5,] NA 7
 [6,] NA 6
 [7,] NA 9
 [8,] NA 8
 [9,] NA 7

لاحظ أن القيم المفقودة لأقصر ناقل يتم ملؤها الآن بقيم NA.

ملاحظة : في هذا المثال استخدمنا cbind مع متجهين ولكن يمكنك استخدام بناء جملة مشابه لاستخدام cbind مع أكثر من متجهين.

مصادر إضافية

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

كيفية استخدام cbind في R (مع أمثلة)
كيفية استخدام rbind في R (مع أمثلة)
كيفية إعادة تسمية الأعمدة عند استخدام cbind في R