Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/74.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
对R中数据帧中的每一行的特定列应用函数_R_Dataframe - Fatal编程技术网

对R中数据帧中的每一行的特定列应用函数

对R中数据帧中的每一行的特定列应用函数,r,dataframe,R,Dataframe,我想对R中数据帧中的每一行的特定列应用一个用户定义的函数,并将结果保存回该列。在阅读了近3个小时的堆栈溢出答案后,我会回答一些稍有不同的用例,并尝试使用apply、lappy、sapply等。下面是允许您执行此操作的代码: your_function <- function(x) { if(x == 3) { x = 333 } else { x = 1 } } df$colname <- sapply(df$colname,

我想对R中数据帧中的每一行的特定列应用一个用户定义的函数,并将结果保存回该列。

在阅读了近3个小时的堆栈溢出答案后,我会回答一些稍有不同的用例,并尝试使用apply、lappy、sapply等。下面是允许您执行此操作的代码:

your_function <- function(x) {
    if(x == 3) {
        x = 333
    } else {
        x = 1
    }
}

df$colname <- sapply(df$colname, your_function)

经过近3个小时的阅读,Stack Overflow回答了一些略有不同的用例,并使用apply、lapply、sapply等进行了尝试。下面是允许您执行此操作的代码:

your_function <- function(x) {
    if(x == 3) {
        x = 333
    } else {
        x = 1
    }
}

df$colname <- sapply(df$colname, your_function)

问之前你知道答案吗?为什么问题和答案同时发布?如果你知道答案,那么发布这个问题的原因是什么?好吧,因为我在别处找不到我问题的答案。我想也许发布我的发现可能会帮助其他人解决同样的问题。实际上,你可以勾选一个复选框来回答你自己的问题。是的,这是明确鼓励的:感谢分享@stroz-它帮助你在提问之前知道答案?为什么问题和答案同时发布?如果你知道答案,那么发布这个问题的原因是什么?好吧,因为我在别处找不到我问题的答案。我想也许发布我的发现可能会帮助其他人解决同样的问题。实际上,有一个复选框可以用来回答你自己的问题。是的,这是明确鼓励的:谢谢分享@stroz-它帮助了我