Geog_5113_module10_chi_square_in_R.R