请高人指点，这图怎么才能做在一起呢？

37986675

sc        bjg
105        B
40        A
5        A
950        A
15        A
10        A
1670        A
5        A
75        A
50        A
1010        A
275        A
415        B
60        A
20        B
70        B
45        A
45        B
615        B
325        A
140        A
205        A
155        B
1695        A
135        A
15        B
235        A
325        A
1005        A
1925        A
600        A
120        A
260        A
55        A
5        A
1990        A
395        A
250        B
425        A
530        B
数据如上。
想做一箱图，将A、B、和A+B坐在一个图里。下边标注A  B   AB
俺是新手，实在弄不清楚了，两个图可以分别做出来，但放不到一起。请大虾指教一二

genechip

mynumber<-sample(100,20);
myfactor<-sample(c("A","B"),20,replace=T);
mydata<-data.frame(sc=mynumber,bjg=myfactor);
#上面这个是模仿你的数据。
#你需要将你的数据再给一个标签A+B
newfactor<-rep("A+B",20);
newdata<-data.frame(sc=mynumber,bjg=newfactor);
#两套数据，mydata是你原来数据带有A和B标签，newdata是原来数据带有A+B数据
#将两套数据合并
alldata<-rbind(mydata,newdata);
#箱式图如下
boxplot(sc~bjg,data=alldata);

37986675

{:soso_e183:}多谢，学习ing