Question 4 (6.6 points) Suppose we would like to create a 95% confidence interval for the average shipping time (in days) for an essential item based on temperature, supply, and day of the week the order was placed. What function(s) in R would we use to calculate this confidence interval? Use the prop.test() command. Create a model using the Im() command, and then use the summary() command. Create a model using the Im() command, and then use the predict() command. Question 3 (6.6 points) Suppose we use Pearson's Chi-Squared test for a data set with variables: did a customer purchase an extended warranty (yes/no) and region (north/south/east/west). We obtain a p-value of 0.0004 What do we conclude? The average revenue from extended warranties is about the same in all regions. The average revenue from extended warranties is not the same in all regions. The percentage of customers who purchased extended warranties is about the same in all regions. The percentage of customers who purchased extended warranties is not the same in all regions.