R by() 回合 stat.desc

Question

我很关心下面的问题。如果我应用函数

by(productivity$LOC, productivity$extension, stat.desc, norm = TRUE, basic = TRUE)

如何舍入 by() 函数的输出值？

Answer 1

您可以通过定义 FUN=function() 值将值显式传递给函数。

使用 mtcars 数据集

library(pastecs)

注意第一行是第二行的缩写

by(mtcars$mpg, mtcars$am, stat.desc, norm = TRUE, basic = TRUE) 
by(mtcars$mpg, mtcars$am, function(X)  stat.desc(X, norm = TRUE, basic = TRUE))

使用第二种方法将多个函数传递给by函数

result <- by(mtcars$mpg, mtcars$am, function(X)  
                           round(stat.desc(X, norm = TRUE, basic = TRUE), 1))

然后您可以将结果放入数据框中

do.call(cbind.data.frame, result)

R by() round stat.desc