Iron and nickel are the elements most similar to cobalt
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
Answer:
a)P₂ =4 bar
b)W= - 1482.48 KJ
It means that work done on the system.
c)S₂ - S₁ = 3.42 KJ/K
Explanation:
Given that
T₁ = 300 K ,V₁ = 3 m³ ,P₁=2 bar
T₂ = 600 K ,V₂=V₁ 3 m³
Given that tank is rigid and insulated.It means that volume of the gas will remain constant.
Lets take the final pressure = P₂
For ideal gas P V = m R T



P₂ =4 bar
Internal energy
ΔU = m Cv ΔT
Cv=0.71 KJ/kg.k for air


m= 6.96 kg
ΔU= 6.96 x 0.71 x (600 - 300)
ΔU=1482.48 KJ
From first law
Q= ΔU + W
Q= 0 Insulated
W = - ΔU
W= - 1482.48 KJ
It means that work done on the system.
Change in the entropy


S₂ - S₁ = 3.42 KJ/K