R绑定get粘贴

Question

cbind()函数作用于x <- cbind(a,b)

其中可以为函数b = get(paste0('var',i))指定列名'b'，

即x <- cbind(a,b = get(paste0('var',i)))

我正在尝试做以下事情:

x <- cbind(a, get(paste0('var',i))) = j), where "可以是向量，也可以是函数。

Error: unexpected '=' in "x <- cbind(a, get(paste0('var',i))) = j)"

如果我只指定"x <- cbind(a, get(paste0('var',i))))"，那么第二列名称是"get(paste0('var',i))))"，这是不方便的。

如何使用get(paste())函数在cbind()或rbind()或bind_cols()中定义列名?或者另一种解决方案是什么?

Answer 1

一个例子将有助于理解问题，但也许这?

x <- cbind(a, j)
colnames(x)[2] <- get(paste0('var',i))

或者如果你想在单行中完成-

x <- cbind(a, setNames(j, get(paste0('var',i))))

Answer 2

我们可以使用

x <- data.frame(a, j)
colnames(x)[2] <- get(paste('var', i, sep=""))

---

或者使用tibble

tibble(a, !! b := j)