Please do the following 4 problems. For each plot, you need to add a title for your work: Your LastName Figure X. The scripts sample: labs(title = "Your LastName Figure X")can be added for this purpose.

1.Please use the built-in dataset SAT in the package MosaicData. Plot a scatterplot for the variables salaryand sat. Your plot should be the same as the plot below. The main features: purple points, red line, and Y-axis with $. Use the title like "Your LastName Figure 1" for your plot.

Dr Tu Figure 2 prof - 20% clerical - 18% service - 16% other - 13% sector manuf - 13% manag- 10% sales - 4% const - 0.0% 5.0% 10.0% 15.0% 20.0% PercentDr Tu Figure 3 service clerical 16% 18% sales const 7% 1% manag 10% prof 20% manuf 13% other 13%