data(stackloss)
[,1] | x1 | Air.Flow | Flow of cooling air |
[,2] | x2 | Water.Temp | Cooling Water Inlet |
Temperature | |||
[,3] | x3 | Acid.Conc. | Concentration of acid |
[per 1000, minus 500] | |||
[,4] | y | stack.loss | Stack loss |
x1
represents the rate of operation of the plant.
x2
is the temperature of cooling water circulated through coils in the
absorption tower.
x3
is the concentration of the acid circulating,
minus 50, times 10: that is, 89 corresponds to 58.9 per cent acid.
y
(the dependent variable) is 10 times the percentage of the ingoing
ammonia to the plant that escapes from the absorption column
unabsorbed; that is, an (inverse) measure of the over-all efficiency
of the plant.''
data(stackloss) summary(lm.stack <- lm(stack.loss ~ stack.x))