thêm dữ liệu trải rộng vào các chấm trong R

Question

Tôi có một bảng có phạm vi trung bình và khoảng cách giữa các vùng. Tôi muốn tạo một chấm điểm, nơi dấu chấm sẽ hiển thị mức trung bình này, và một thanh sẽ kéo dài qua dấu chấm, để hiển thị phạm vi interquartile. Nói cách khác, dấu chấm sẽ là điểm giữa của một thanh, chiều dài của nó sẽ bằng với dữ liệu dãy ô liên tiếp của tôi. Tôi đang làm việc trong R.

Ví dụ,

labels<-c('a','b','c','d') 
averages<-c(10,40,20,30) 
ranges<-c(5,8,4,10) 
dotchart(averages,labels=labels) 

nơi các dãy sau đó sẽ được thêm vào cốt truyện này như quán bar.

Bất kỳ ý tưởng nào?

Cảm ơn!

Answer 1

Một phương pháp khác, sử dụng cơ sở.

labels <- c('a', 'b', 'c', 'd') 
averages <- c(10, 40, 20, 30) 
ranges <- c(5, 8, 4, 10) 
dotchart(averages, labels=labels, xlab='average', pch=20, 
     xlim=c(min(averages-ranges), max(averages+ranges))) 
segments(averages-ranges, 1:4, averages+ranges, 1:4) 

Answer 2

ggplot2 có một cơ sở tốt để làm điều này:

library(ggplot2) 

labels<-c('a','b','c','d') 
averages<-c(10,40,20,30) 
ranges<-c(5,8,4,10) 

x <- data.frame(labels,averages,ranges) 

ggplot(x, aes(averages,labels)) + 
geom_point() + 
geom_errorbarh(aes(xmin=averages-ranges,xmax=averages+ranges)) 

Cung cấp cho bạn một âm mưu như:

Answer 3

Đối với hồ sơ, đây là một giải pháp lưới, trong đó sử dụng một cặp vợ chồng các chức năng từ gói Hmisc:

library(lattice) 
library(Hmisc) 

labels<-c('a','b','c','d') 
averages<-c(10,40,20,30) 
ranges<-c(5,8,4,10) 
low <- averages - ranges/2 
high <- averages + ranges/2 
d <- data.frame(labels, averages, low, high) 

Dotplot(labels ~ Cbind(averages, low, high), data = d, 
     col = 1,          # for black points 
     par.settings = list(plot.line = list(col = 1)), # for black bars 
     xlab = "Value")