2016-12-10 3 views

ответ

3
ggplot(data = diamonds) + stat_summary(
    mapping = aes(x = cut, y = depth), 
    fun.ymin = function(z) { quantile(z,0.25) }, 
    fun.ymax = function(z) { quantile(z,0.75) }, 
    fun.y = median) 
1

раствора переписано G5W, используя функцию геой вместо функции стата:

ggplot(data = diamonds) + 
    geom_pointrange(mapping = aes(x = cut, y = depth), 
        stat = "summary", 
        fun.ymin = function(z) {quantile(z,0.25)}, 
        fun.ymax = function(z) {quantile(z,0.75)}, 
        fun.y = median) 

enter image description here