如何提取summary（）的各统计数

统计R浪人 发表于 2013-7-19 13:40
谢谢，也能够实现，不知道是否有更直接的办法，从str（a）或者attributes(a)来看，看看能否找到更便捷的提 ...

apply(data, 2, summary)

直接a <- apply(data, 2, summary)出来一个矩阵，然后你要哪个数就提取哪个数就可以了

> a <- apply(data, 2, summary)
> a
            A     B     C     D
Min.    26.56 26.02 25.49 26.54
1st Qu. 27.70 29.21 28.25 28.46
Median  29.17 29.35 29.15 29.37
Mean    29.19 29.29 29.11 29.65
3rd Qu. 29.62 29.62 29.78 30.23
Max.    43.15 30.61 35.13 40.06

比如A的mean就是a[4, 1]

qoiqpwqr 发表于 2013-7-20 11:32
> a  a
            A     B     C     D
Min.    26.56 26.02 25.49 26.54

列数据量不同时，该方法行不通
> a <- apply(data, 2, summary)
> a
$A
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max.
  26.56   27.70   29.17   29.19   29.62   43.15

$B
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's
  26.02   29.22   29.34   29.23   29.60   30.55       3

$C
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max.
  25.49   28.25   29.15   29.11   29.78   35.13

$D
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's
  26.54   28.35   29.52   29.70   30.28   40.06       3

> a[2,1]
Error in a[2, 1] : incorrect number of dimensions

统计R浪人 发表于 2013-7-20 17:09
列数据量不同时，该方法行不通
> a  a
$A

sapply(a,'[',seq(max(sapply(a,length))))

summary函数返回的是list，可以用view(summary())查看list的构造