下面的代码是我尝试用函数改变x中的数据表,数据表x中有名为MutationStatus和疾病的列。当我将x作为数据表,将y作为字符串手动插入disease列内时,函数可以工作,然而将其作为函数插入则不行。
diseaseMutation <- function(x,y) {
x$MutationStatus[x$disease != y] = "WT"
x$disease[x$disease != y] = y
}
我们需要返回'x'
diseaseMutation <- function(x,y) {
x$MutationStatus[x$disease != y] = "WT"
x$disease[x$disease != y] = y
x
}