ggplot画箱型图，每组的数据没有聚在一起

想画箱型图，数据框为differnential，两个分组“CON”和“HIGH”，想比较ADENINE列的差异。

代码如下：
differential$group<-as.factor(differential$group)
A<-ggplot(differential,aes(x = group, y = ADENINE))+
scale_x_discrete(name="ADENINE")+
geom_boxplot(fill="skyblue1",
colour="skyblue1",
alpha=0.7,
outlier.colour="#1F3552",
outlier.shape=20)
A

每个数据都分开了没聚在一个箱里。请问问题出哪儿了？