R x-axis ordering

Question

axis into numerical order. However, I can\'t...

ggplot(dat,aes(x=row.names(dat),y=X1,shape=factor(Y),color=factor(Y)))+geom_point()+ scale_shape_manual(values=c(1,2))