如何在R中的一个函数中找到多个解?

如何在R中的一个函数中找到多个解?,r,R,我刚开始学习R,我找不到任何解决这个简单问题的方法。我试图创建自己的函数 sta<-function(a) {mean1将其作为向量返回 sta <- function(a) { c(mean1 = mean(a, na.rm = TRUE), var1 = var(a, na.rm = TRUE)) } 比如说, new_var <- sta(mtcars$mpg) new_var #mean1 var1 # 20 36 或者您也可以将它们作为

我刚开始学习R,我找不到任何解决这个简单问题的方法。我试图创建自己的函数

sta<-function(a) 
{mean1将其作为向量返回

sta <- function(a) {
   c(mean1 = mean(a, na.rm = TRUE),  var1 = var(a, na.rm = TRUE))
}
比如说,

new_var <- sta(mtcars$mpg)
new_var
#mean1  var1 
#   20    36 
或者您也可以将它们作为列表返回


并使用$运算符访问元素,如new_var$mean1和new_var$var1。

我还想知道,是否可以将此结果传输到函数中的数据部分。没有函数,我可以将mean1结果传输到数据,但当我在函数中编写相同的函数时,它不起作用。因此,我想将mean1和var1结果作为数据部分来查看Rvalue@HüsamettinTayşi如果数据指的是数据帧,那么你可以将函数转换为sta,就像图中一样,在函数运行后,我想在数据部分自动看到新的_var,或者我想自动看到均值作为一个值。对不起,我的短语,我希望我可以表达我自己。如果你做了新的_var
new_var <- sta(mtcars$mpg)
new_var
#mean1  var1 
#   20    36 
new_var['mean1']
#mean1 
#   20 

new_var['var1']
#var1 
#  36 
sta <- function(a) {
  list(mean1 = mean(a, na.rm = TRUE),  var1 = var(a, na.rm = TRUE))
}