Create swirl-summarize3.r