如何防止data.frame中的数字数组从函数

Question

我遇到的问题是我的函数处理数值数组并返回data.frame对象，当我希望数值保持数字时，处理后的值变为字符

myfun=function(x,name){
 m=mean(x)
 s=sd(x)
 df=data.frame(type=name, mu=m, sig=s)
 return(df)
}

> out=myfun(rnorm(10),'read1')
> out
    type        mu       sig
    1 read1 0.2992288 0.6134481
 > apply(out,2,class)
       type          mu         sig 
  "character" "character" "character" 

如何返回此函数的输出以便 mu和sig值保持as.numeric，没有我明确地必须做

 as.numeric(as.character(out$mean))

由于