Analyze data with R

Output: