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

في كثير من الأحيان قد ترغب في تكديس عمودين أو أكثر من أعمدة إطار البيانات في عمود واحد في R.

على سبيل المثال، قد ترغب في البدء من هذا:

 person trial outcome1 outcome2
     A 1 7 4
     A 2 6 4
     B 1 6 5
     B 2 5 5
     C 1 4 3
     C 2 4 2

من أجل هذا:

 person trial outcomes value
      A 1 outcome1 7
      A 2 outcome1 6
      B 1 outcome1 6
      B 2 outcome1 5
      C 1 outcome1 4
      C 2 outcome1 4
      A 1 outcome2 4
      A 2 outcome2 4
      B 1 outcome2 5
      B 2 outcome2 5
      C 1 outcome2 3
      C 2 outcome2 2

يشرح هذا البرنامج التعليمي طريقتين يمكنك استخدامهما في R للقيام بذلك.

الطريقة الأولى: استخدم وظيفة Stack في Base R

يوضح التعليمة البرمجية التالية كيفية تكديس الأعمدة باستخدام وظيفة المكدس في Base R:

 #create original data frame
data <- data.frame(person=c('A', 'A', 'B', 'B', 'C', 'C'),
                   trial=c(1, 2, 1, 2, 1, 2),
                   outcome1=c(7, 6, 6, 5, 4, 4),
                   outcome2=c(4, 4, 5, 5, 3, 2))

#stack the third and fourth columns
cbind (data[1:2], stack (data[3:4]))

   person trial values ind
1 A 1 7 outcome1
2 A 2 6 outcome1
3 B 1 6 outcome1
4 B 2 5 outcome1
5 C 1 4 outcome1
6 C 2 4 outcome1
7 A 1 4 outcome2
8 A 2 4 outcome2
9 B 1 5 outcome2
10 B 2 5 outcome2
11 C 1 3 outcome2
12 C 2 2 outcome2

الطريقة الثانية: استخدم وظيفة الذوبان في Reshape2

يوضح التعليمة البرمجية التالية كيفية تكديس الأعمدة باستخدام وظيفة الذوبان في مكتبة reshape2 :

 #loadlibrary
library(reshape2)

#create original data frame
data <- data.frame(person=c('A', 'A', 'B', 'B', 'C', 'C'),
                   trial=c(1, 2, 1, 2, 1, 2),
                   outcome1=c(7, 6, 6, 5, 4, 4),
                   outcome2=c(4, 4, 5, 5, 3, 2))

#melt columns of data frame
melt(data, id. var = c(' person ', ' trial '), variable. name = ' outcomes ')

   person trial outcomes value
1 A 1 outcome1 7
2 A 2 outcome1 6
3 B 1 outcome1 6
4 B 2 outcome1 5
5 C 1 outcome1 4
6 C 2 outcome1 4
7 A 1 outcome2 4
8 A 2 outcome2 4
9 B 1 outcome2 5
10 B 2 outcome2 5
11 C 1 outcome2 3
12 C 2 outcome2 2

يمكنك العثور على الوثائق الكاملة لوظيفة الدمج هنا .

مصادر إضافية

كيفية تغيير عمودين في R
كيفية إعادة تسمية الأعمدة في R
كيفية جمع أعمدة محددة في R