【发布时间】：2021-12-07 19:11:46
【问题描述】：
我想用一个函数做以下事情：
categoricalToNumeric <- function(data,...) {
for(i in list(...)) {
data$i <- as.numeric(as.factor(data$i))
}
summary(data)
}
然后调用，
categoricalToNumeric(data, 'school', 'sex', 'address', 'famsize', 'Pstatus', 'Mjob', 'Fjob', 'reason', 'nursery', 'internet', 'guardian.x', 'schoolsup.x', 'famsup.x', 'paid.x', 'activities.x', 'higher.x', 'romantic.x', 'guardian.y', 'schoolsup.y', 'famsup.y', 'paid.y', 'activities.y', 'higher.y', 'romantic.y')
目前没有错误，但数据变量不会在categoricalToNumeric 调用时发生变异。
数据：https://archive.ics.uci.edu/ml/machine-learning-databases/00320/student.zip
设置：
data_mat=read.table("./data/csv/student-mat.csv",sep=";",header=TRUE)
data_por=read.table("./data/csv/student-por.csv",sep=";",header=TRUE)
data=merge(data_mat,data_por,by=c("school","sex","age","address","famsize","Pstatus","Medu","Fedu","Mjob","Fjob","reason","nursery","internet"))
print(nrow(data)) # 382 data
head(data,5)
【问题讨论】：
标签： r function variadic-functions