gam code snippets in r

create a point plot with 3 groups and a gam fit using ggplot2 in r