Как использовать cbind в r (с примерами)

Функция cbind в R, сокращенная от columns-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: Cвязать два кадра данных

Следующий код показывает, как использовать 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.