assignment1 R Markdown

data analysis, R Markdown, assignment1