加载中…

加载中...

difference between fivenum() and quantile()

转载 2015-06-17 16:05:01

下面是具体的算法:

x <- 1:100

n <- length(x)

probs = seq(0, 1, 0.25)

index <- 1 + (n - 1) * probs

lo <- floor(index)

hi <- ceiling(index)

x <- sort(x, partial = unique(c(lo, hi)))

qs <- x[lo]

i <- which(index > lo)

h <- (index - lo)[i]

qs[i] <- (1 - h) * qs[i] + h * x[hi[i]]###

qs
quantile(x=1:100) 


​fivenum只是基于中位数的概念,而quantile则是基于分位数的概念

x <- 1:100

n <- length(x)

n4 <- floor((n + 3)/2)/2

d <- c(1, n4, (n + 1)/2, n + 1 - n4, n)

0.5 * (x[floor(d)] + x[ceiling(d)])

fivenum(x=1:100)

转自人大经济论坛http://bbs.pinggu.org/thread-2660210-1-1.html

> x=c(2,5,10,11,13,20,30)

> fivenum(x)

[1]  2.0  7.5 11.0 16.5 30.0

> x=c(2,5,10,11,13,20,30,35)

> fivenum(x)[1]  

2.0  7.5 12.0 25.0 35.0


阅读(0) 评论(0) 收藏(0) 转载(0) 举报/Report

评论

重要提示:警惕虚假中奖信息
0条评论展开
相关阅读
加载中,请稍后
鏋濆彾椋炴壃
  • 博客等级:
  • 博客积分:0
  • 博客访问:1,922,867
  • 关注人气:0
  • 荣誉徽章:

相关博文

推荐博文

新浪BLOG意见反馈留言板 电话:4000520066 提示音后按1键(按当地市话标准计费) 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 会员注册 | 产品答疑

新浪公司 版权所有