如何将数据框列名称插入方程 R 中？ [复制]

我试图通过引用数据框列名称并将其插入方程而不是直接调用名称来使一段代码更加灵活。尽管我必须直接插入字段名称，但以下示例有效：

require(e1071)

class = c(0.25, 0.34, 0.55)
field1 = c(23, 33, 34)
field2 = c(44, 55, 32)

df = data.frame(class, field1, field2)

mysvm = svm(class ~ field1 + field2, data = df)

下面的例子does not工作，我不知道为什么：

require(e1071)

class = c(0.25, 0.34, 0.55)
field1 = c(23, 33, 34)
field2 = c(44, 55, 32)

df = data.frame(class, field1, field2)

name1 = names(df)[2]
name2 = names(df)[3]

mysvm = svm(class ~ name1 + name2, data = df)

如何引用数据框中的第二列和第三列并将它们正确插入到方程中？

变量name1包含一个等于的字符串names(df)[2]，假设它是"foo". When svm收到一个formula对象与术语name1，它搜索名为的对象name1并用该对象的值替换该对象。那是，svm试图“回归”变量class在长度为一的字符向量上"foo"，这当然没有意义。

这里的一种解决方法是将公式创建为字符串，然后将其转换为公式。这是我不时使用的一个实用函数：

xyform <- function (y_var, x_vars) {
# y_var: a length-one character vector
# x_vars: a character vector of object names
    as.formula(sprintf("%s ~ %s", y_var, paste(x_vars, collapse = " + ")))
}