write code in R. Please only use the lm function to predict. Fit a model to predict bill length from bill depth with different intercepts (but not slopes) based on sex for the palmerpenguins data. Construct a 95% confidence interval for the slope of the regression equation. Please use the degree of freedom instead of the confint function in finding the answer. Save your answer in the variable q2.e Hint: The degrees of freedom depends on the number of parameters in the model, but can be found from the output of the summary(lm(...)) command. Save your answer in the variable q2.e