Using smooth spline in stat scale in ggplot2…

Using smooth.spline in stat_scale in ggplot2

From: http://groups.google.com/group/ggplot2/browse_thread/thread/149dfa0891fe383a