Answer:
a) > x<-c(1,2,3,4,5)
> y<-c(1.9,3.5,3.7,5.1,6)
> linearmodel<-lm(y~x)
And the output is given by:
> linearmodel
Call:
lm(formula = y ~ x)
Coefficients:
(Intercept) x
1.10 0.98
b) 
And if we compare this with the general model 
We see that the slope is m= 0.98 and the intercept b = 1.10
Explanation:
Part a
For this case we have the following data:
x: 1,2,3,4,5
y: 1.9,3.5,3.7,5.1, 6
For this case we can use the following R code:
> x<-c(1,2,3,4,5)
> y<-c(1.9,3.5,3.7,5.1,6)
> linearmodel<-lm(y~x)
And the output is given by:
> linearmodel
Call:
lm(formula = y ~ x)
Coefficients:
(Intercept) x
1.10 0.98
Part b
For this case we have the following trend equation given:

And if we compare this with the general model 
We see that the slope is m= 0.98 and the intercept b = 1.10
Here are the answers:
1. False - Molecules is the smallest part of an element that behaves like the element.
2. False - The nucleus contains both protons and neutrons
3. True
4. True
5. A. Nucleus
6. D. Neutron
7. B. Protons and Neutrons
8. C. Electron
9. C. 6
10. C.6
Answer:
1) Addition of a catalyst
2) To change the reaction rate of slope B to look like slope A, simply add a catalyst to speed up the rate of reaction, giving you a higher amount of products in a shorter amount of time (line A)
Explanation:
1 and 2)Two things can alter the rate of a reaction, either the addition of a catylist which will not alter the composition of the products or reactants, but will accelerate the reaction time, or an increase in temperature will also increase the rate at which a reaction will occur.
You could choose temperature also and have the same result, it's your choice both are correct, but catalyst is the easiest.