次の様なデータResを使用した場合にRegの値で任意に色分けした散布図を作成したいです。
Reg h w sex
1 1 180 60 M
2 2 155 50 F
3 3 160 55 F
4 2 170 65 M
....

base <- ggplot(Res, aes(x = h, y = w, colour = Reg))
points <- base + geom_point(size = 5)
plot(points)

このままの実行ではRegの値での色分けはされるのですが、
青系色の濃淡でのみ分けられている状態です。
より明確に、赤や緑等に分けて表示したいのですが、
どのように書けば良いのでしょうか。教えてください。
よろしくお願いします。