Chapter 9 5번 문제

library(gcookbook)
ggplot(data=heightweight,aes(x=heightIn,y=weightLb,color=sex))+geom_smooth(alpha=0.5,method=lm,se=F)+geom_point(alpha=0.5,size=3)+theme_classic()+xlim(c(50,75))+ylim(c(48,176))+scale_x_continuous(breaks=c(50,55,60,65,70))+scale_y_continuous(breaks=c(50,75,100,125,150,175))+labs(title="Scatterplot",subtitle = "Weight Vs Height", caption="Source:heightweight")

## Scale for 'x' is already present. Adding another scale for 'x', which will
## replace the existing scale.

## Scale for 'y' is already present. Adding another scale for 'y', which will
## replace the existing scale.

## `geom_smooth()` using formula 'y ~ x'