初识R语言—统计篇之描述性统计

from 阿雷边学边教R语言

描述性统计

• summary函数
  得到常用的统计值（*最小值，最大值，上下四分位数，均值，中位数）

#数据单列情况
> data <- mtcars$cyl
> s1 <- summary(data)
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
  4.000   4.000   6.000   6.188   8.000   8.000 

> s1[1]
Min. 
   4
> s1[["Min."]]
[1] 4

#数据多列情况
> data <- mtcars[c("cyl","wt","hp")]
> s2 <- summary(data)
     cyl              wt              hp       
 Min.   :4.000   Min.   :1.513   Min.   : 52.0  
 1st Qu.:4.000   1st Qu.:2.581   1st Qu.: 96.5  
 Median :6.000   Median :3.325   Median :123.0  
 Mean   :6.188   Mean   :3.217   Mean   :146.7  
 3rd Qu.:8.000   3rd Qu.:3.610   3rd Qu.:180.0  
 Max.   :8.000   Max.   :5.424   Max.   :335.0  
> s2[,2][1]#和s2[1,2]的结果是一样的
"Min.   :1.513  " 

• pastecs包的stat.desc函数
  得到常用的统计值（上述的*+方差标准差+...）
  ps：我的电脑装不上这个包，直接盗用阿雷的结果啦，感谢阿雷
  pastecs results
• table函数
  作频数统计

#单个变量计数
> table(mtcars$cyl)

 4  6  8 
11  7 14 
#双变量计数
> table(mtcars$cyl,mtcars$vs,dnn=c("cyl","vs"))#dnn是对结果的行和列进行命名
   vs
cyl  0  1
  4  1 10
  6  3  4
  8 14  0