Вам необходимо создать test
как структуру с таким же количеством строк, чтобы cbind.data.frame
не выдавала ошибку:
test <-data.frame(row.names=1:4)
df <- data.frame(x=c(1,2,3,4))
test <- cbind(test, df)
test
x
1 1
2 2
3 3
4 4
Два других метода:
> test <-data.frame(row.names=1:4)
> test[['x']] <-c(1,2,3,4)
> test
x
1 1
2 2
3 3
4 4
> test <-data.frame(row.names=1:4)
> test[1] <-list(x=c(1,2,3,4))
> test
x
1 1
2 2
3 3
4 4