# Homework 03 template
# ====================

# Goal: read datasets, test it consistency, and use it


# clear workspace
rm(list = ls())

# edit the following lines:
# - read cars.csv from the current directory
cars <-
# - calculate correlation between mpg and horse power
mpg_hpw_cor <-
# - read Cars.sav
cars2 <-
# - check whether the two files have the same names (case insensitive);
#   the result is one logical value (TRUE or FALSE)
same_header <-


# save all four created variables (cars, cars2, mpg_hpw_cor, and same_header)
# into results.RData