Chp 1 Introduction

# load packages
libs<-c("magrittr")
invisible(lapply(libs, library, character.only = TRUE))

summary of chapter 1