Use R script to answer the following question

Question 4 (25 points): A company wanted to know if attending a course on "how to be a successful salesperson" can increase the average sales of its employees. The company sent six of its salesperson to attend this course. The following table gives the one-week sales of these salespersons before and after they attended the course. Before 12 8259 14 16 After 18 24 24 14 1620 Using the 5% significance level, can you conclude that the mean weekly sales for all salespersons increase as a result of attending this course