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

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

代码及数据如下
> data<-read.csv("test.csv")
> data
       A     B     C     D
1  27.68 29.25 28.11 28.82
2  29.56 29.13 26.06 28.70
3  26.56 29.52 35.13 27.42
4  27.13 29.33 30.35 34.38
5  27.40 29.21 29.39 29.01
6  30.49 29.25 28.95 28.23
7  28.80 29.43 29.15 26.91
8  29.17 29.31 28.91 40.06
9  27.72 29.33 29.78 30.61
10 43.15 29.56 29.88 30.23
11 29.62 29.70 29.88 29.72
12 30.25 29.35 28.23 27.83
13 30.37 28.95 26.85 31.65
14 29.37 29.41 30.90 30.04
15 29.17 29.11 29.23 30.19
16 26.67 29.05 29.72 27.66
17 26.91 29.41 28.29 30.29
18 26.67 29.47 28.86 30.47
19 29.11 29.31 25.49 28.21
20 27.70 29.23 29.03 26.54
21 29.50 29.86 27.40 30.72
22 29.47 29.62 29.78 27.01
23 29.60 26.91 28.25 30.68
24 26.71 26.02 30.15 28.72
25 31.00 30.55 29.90 29.84
26 31.18 28.88 28.97 29.13
27 30.17 29.68 30.07 29.96
28 30.15 29.88 28.21 30.02
29 28.50 29.70 28.21 28.74
30 29.62 29.62 29.70 29.33
31 27.97 30.39 28.80 29.37
32 28.07 28.62 29.62 28.46
33 27.91 30.61 29.35 29.41
> a<-summary(data)
> a
       A               B               C               D        
Min.   :26.56   Min.   :26.02   Min.   :25.49   Min.   :26.54  
1st Qu.:27.70   1st Qu.:29.21   1st Qu.:28.25   1st Qu.:28.46  
Median :29.17   Median :29.35   Median :29.15   Median :29.37  
Mean   :29.19   Mean   :29.29   Mean   :29.11   Mean   :29.65  
3rd Qu.:29.62   3rd Qu.:29.62   3rd Qu.:29.78   3rd Qu.:30.23  
Max.   :43.15   Max.   :30.61   Max.   :35.13   Max.   :40.06
我想提取各列中的6个参数：Min.   、 1st Qu.，Median的数值，如何做呢？

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：Summary Summa Mary 如何提取 Mar 如何 统计

学习

”我想提取所有的6个参数：Min.   、 1st Qu.，Median的值“，不是很清楚lz到底想问什么，能说的具体点么？

求证1加1 发表于 2013-7-19 12:43
”我想提取所有的6个参数：Min.   、 1st Qu.，Median的值“，不是很清楚lz到底想问什么，能说的具体点么？

我想取出A列的Min、Min.   、 1st Qu.，Median的数值

统计R浪人 发表于 2013-7-19 12:49
我想取出A列的Min、Min.   、 1st Qu.，Median的数值

Maybe you can use the code as follow:

1. a[1:3,1]

复制代码

a<-sub("Min.   :|1st Qu.:|Median :|Mean   :|3rd Qu.:|Max.   :","",a)
然后字符串变数值。。
我是用正则一个愚蠢的方法，替换，其实还有其他的什么，正则去匹配"："等等。

求证1加1 发表于 2013-7-19 12:57
Maybe you can use the code as follow:

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

410234198 发表于 2013-7-19 13:01
a

谢谢，这样真的可以

410234198 发表于 2013-7-19 13:01
a

这主意不错

1. B<-1:100
   
2. B<-matrix(B,10)
   
3. C<-summary(B)
   
4. C[1:3,1]
   
5. D<-C[1:3,1];
   
6. a<-substr(D[1],10,13);
   
7. b<-substr(D[2],10,13);
   
8. c<-substr(D[3],10,13);
   
9. as.numeric(c(a,b,c));

复制代码

求证1加1 发表于 2013-7-19 13:14
这主意不错

谢谢，也能够实现，不知道是否有更直接的办法，从str（a）或者attributes(a)来看，看看能否找到更便捷的提取方式