我的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，求高手帮帮忙啊！