Academic Integrity: tutoring, explanations, and feedback — we don’t complete graded work or submit on a student’s behalf.

please write the question in r and give the r code, thank you 3.31. Several oven

ID: 3046683 • Letter: P

Question

please write the question in r and give the r code, thank you

3.31. Several ovens in a metal working shop are used to heat metal specimens. All the ovens are supposed to operate at the same temperature, although it is suspected that this may not be true. Three ovens are selected at random, and their tem peratures on successive heats are noted. The data collected are as follows: Oven Temperature 1 491.50 498.30 498.10 493.50 493.60 2 488.50 484.65 479.90 477.35 3 490.10 484.80 488.25 473.00 471.85 478.65

Explanation / Answer

The R code is :

temperature=c(491.5,498.3,498.1,493.5,493.6,488.5,484.65,479.9,477.35,

490.1,484.8,488.25,473,471.85,478.65)

oven = c(rep("x1",5), rep("x2",4), rep("x3",6))

data1= data.frame(temperature,oven)

results = aov(temperature~ oven, data=data1)

summary(results)

Now, H0: there is no significant difference in temperature between the ovens

H1:not H0

So,

(a) as p-value<0.05 , we reject H0 and conclude that there may be a significant difference between the ovens

(b) mse: 34.48

(c) model is adequate, data is normaland variances are constant

the code for the same is :

bartlett.test(temperature~ oven, data=data1)

qqnorm(temperature)

qqline(temperature)