Як використовувати cbind у r (з прикладами)

Функцію cbind у R, скорочення від column-bind , можна використовувати для об’єднання векторів, матриць і кадрів даних за стовпцями.

Наступні приклади показують, як використовувати цю функцію на практиці.

Приклад 1: Зв’язування векторів у матриці

Наступний код показує, як використовувати cbind для зв’язування двох векторів-стовпців в одну матрицю:

 #create two vectors
a <- c(1, 3, 3, 4, 5)
b <- c(7, 7, 8, 3, 2)

#cbind the two vectors into a matrix
new_matrix <- cbind(a, b)

#view matrix
new_matrix

     ab
[1,] 1 7
[2,] 3 7
[3,] 3 8
[4,] 4 3
[5,] 5 2

#view class of new_matrix
class(new_matrix)

[1] "matrix" "array" 

Приклад 2: зв’язування вектора з кадром даних

Наступний код показує, як використовувати cbind для прив’язки вектора до існуючого кадру даних:

 #create data frame
df <- data. frame (a=c(1, 3, 3, 4, 5),
                 b=c(7, 7, 8, 3, 2),
                 c=c(3, 3, 6, 6, 8))

#definevector
d <- c(11, 14, 16, 17, 22)

#cbind vector to data frame
df_new <- cbind(df, d)

#view data frame
df_new

  abcd
1 1 7 3 11
2 3 7 3 14
3 3 8 6 16
4 4 3 6 17
5 5 2 8 22

Зауважте, що R видасть помилку, якщо довжина вектора не збігається з довжиною стовпців у існуючому кадрі даних.

Приклад 3: зв’язування кількох векторів із кадром даних

У наведеному нижче коді показано, як використовувати cbind для прив’язування кількох стовпчастих векторів до існуючого кадру даних:

 #create data frame
df <- data. frame (a=c(1, 3, 3, 4, 5),
                 b=c(7, 7, 8, 3, 2),
                 c=c(3, 3, 6, 6, 8))

#definevectors
d <- c(11, 14, 16, 17, 22)

e <- c(34, 35, 36, 36, 40) 

#cbind vectors to data frame
df_new <- cbind(df, d, e)

#view data frame
df_new

  a B C D E
1 1 7 3 11 34
2 3 7 3 14 35
3 3 8 6 16 36
4 4 3 6 17 36
5 5 2 8 22 40

Приклад 4: Cbind два кадри даних

Наступний код показує, як використовувати cbind для зв’язування двох кадрів даних в один:

 #create two data frames
df1 <- data. frame (a=c(1, 3, 3, 4, 5),
                  b=c(7, 7, 8, 3, 2),
                  c=c(3, 3, 6, 6, 8))

df2 <- data. frame (d=c(11, 14, 16, 17, 22),
                  e=c(34, 35, 36, 36, 40))

#cbind two data frames into one data frame
df_new <- cbind(df1, df2)

#view data frame
df_new

  a B C D E
1 1 7 3 11 34
2 3 7 3 14 35
3 3 8 6 16 36
4 4 3 6 17 36
5 5 2 8 22 40

Бонус: якщо ви хочете зв’язати вектори, матриці або кадри даних за рядками, ви можете використовувати замість цього функцію rbind.