$**$THE PROGRAMMING LANGUAGE IS IN R$,$RSTUDIOS, and JUPYTER. Please don't use pandas or Python.

$7\mathrm{.}8$ LAB: Creating simple linear regression models

The nbaallelo$\_$slr dataset contains information on $126315$ NBA games between $1947$ and $2015.$ The columns report the points made

by one team, the Elo rating of that team coming into the game, the Elo rating of the team after the game, and the points made by the

opposing team. The Elo score measures the relative skill of teams in a league.

Load the dataset into a data frame.

Create a new column y in the data frame that is the difference between the points made by the two teams.

Use the lm $()$ function to perform a simple linear regression using y as the output feature and elo$\_$i as the input feature.

Print the intercept and slope of the linear regression model.

Compute the proportion of variation explained by the linear regression.

Ex: If the Elo rating of the team after the game, elo$\_$n$,$ is used instead of elo$\_$i$,$ the output is:

$[1]$ "The intercept of the linear regression line is $-59\mathrm{.}135."$

$[1]$ "The slope of the linear regression line is $0\mathrm{.}04."$

$[1]$ "The proportion of variation explained by the linear regression model is $0\mathrm{.}111."$

$587778\mathrm{.}2727428\mathrm{.}9$ xx$3$zq$9$y$7$

$*****************$Start of code$*********************$

Read in nbaallelo$\_$slr$.$csv

nba # Your code here

Create a new column in the data frame that is the difference between pts and opp$\_$pts

nba$y # Your code here

Fit a least squares regression model on y and elo$\_$i

SLRModel # Your code here

Print the intercept

intercept # Your code here

print$($paste$0("$The intercept of the linear regression line is $",$ format$($round$($intercept$,3)),"."))$

Print the slope

slope # Your code here

print$($paste$0("$The slope of the linear regression line is $",$ format$($round$($slope$,3)),"."))$

Compute the proportion of variation explained by the linear regression

rSquare # Your code here

print$($paste$0("$The proportion of variation explained by the linear regression model is $",$ format$($round$($rSquare$,3)),"$