如何从函数参数中设置列

Question

data(mtcars)
sset <- function(column){
mtcars$column}

为什么这不起作用？基本上，如果我可以选择一个列，我将能够做更多。我知道还有其他的子集方法，但这根本不可行吗？

Answer 1

您应该使用[]对变量和参数进行子集化：

sset <- function(column) {
   mtcars[,column]
}

sset("mpg")

#[1] 21.0 21.0 22.8 21.4 18.7 18.1 14.3 24.4 22.8 19.2 17.8 16.4 17.3 15.2 10.4 10.4
#[17] 14.7 32.4 30.4 33.9 21.5 15.5 15.2 13.3 19.2 27.3 26.0 30.4 15.8 19.7 15.0 21.4