Create swirl-summarize2.r