R程序问题，关于矩阵计算的，新手上路，多多指教，感恩跪谢~~~

1. A<-read.table("clipboard",header=F) #这个是我从剪贴板里读取数据的
   
2. names(A)<-NULL
   
3. B<-as.matrix(A) # 转化成矩阵
   
4. myfun<-function(x){
   
5. x<-x[x!=0]
   
6. Ex=mean(x)
   
7. En=(1/sqrt(2*pi))*(1/length(x))*sum(abs(x-Ex)) # n换成了length(x)，是这一列的非0元素个数
   
8. He=sqrt(var(x)-En^2)
   
9. data.frame(Ex=Ex,En=En,He=He)
   
10. }
    
11. # 这样你可以看出每一列对就你要计算的那一列
    
12. # 每一行依次对应Ex,En,He三个值
    
13. matrix(unlist(apply(B,2,myfun)),3,10)

复制代码

jiangbeilu 发表于 2014-12-2 13:37

问题解决了，十二分的感谢~~{:3_52:}
我是统计学的在读硕士，之前没有学过R，所以现在用起来很吃力，所以以后一定还有很多不懂得需要向您请教，还望多多指导~跪谢！

如果学过C语言的话学起R来应该不会太难吧。。。

duzongyan 发表于 2014-12-2 16:12
问题解决了，十二分的感谢~~
我是统计学的在读硕士，之前没有学过R，所以现在用起来很吃力，所以 ...

我也是统计学研一的！现在也在学R，有时也会碰到比较麻烦的问题。看了你这个帖子，感觉你挺好学的，想加你为好友，咱们可以讨论，能给我QQ吗？