r - ggmapで凡例を並べ替える

Question

ggmapで凡例の順序をソートするにはどうすればよいですか? 次のコードがあります。

mymap <- ggmap(map) + geom_point(data = mypoints, aes(x =lon, y= lat,colour = month), alpha=0.5, size=5)

月が順番に表示されるようにします (つまり、1 月、2 月、3 月、4 月など)。