boxplot和dotchart怎样画到一起

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

我的dataset长这样：

  Dosis weight sex
1      0    6.62          m
2      0    6.65          m
3      0    5.78          m
4      0    5.63          m
5      0    6.05          m
6      0    6.48          m
7      0    5.50          m
8      0    5.37          m
9      1    6.25          m
10     1    6.95          m
11     1    5.61          m


一共80多个，我把他们的boxplots分性别画出来了：
boxplot( Daten$weight~interaction(Daten$Dosis,Daten$sex, drop=TRUE))

现在我要在每个boxplot旁边加上它的dotchart，求高手帮帮忙啊！

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：dotchart BOXPLOT Chart Hart plot

你看这个例子跟你要求的是不是 一回事——

ds = read.csv("http://www.math.smith.edu/r/data/help.csv")
smallds = subset(ds, female==1)
boxplot(pcs~homeless, data=smallds,
  horizontal=TRUE)
stripchart(round(pcs)~homeless,
  method='stack', data=smallds,
  add=TRUE)

还有这个，应该是一样的——
source("http://www.math.smith.edu/sasr/examples/wild-helper.R")
ds = read.csv("http://www.math.smith.edu/r/data/help.csv")
female = subset(ds, female==1)
theme_update(panel.background = theme_rect(fill="white", colour=NA))
theme_update(panel.grid.minor=theme_line(colour="white", size=NA))
p = ggplot(female, aes(factor(homeless), pcs))
p + geom_boxplot(outlier.colour="transparent") +
   geom_point(position=position_dodge(width=0.2), pch="O") +
   opts(title = "PCS by Homeless") +
   labs(x="Homeless", y="PCS") +
   coord_flip() +
   opts(axis.colour="white")