Skip to content

MANE 6313

Week 13, Module E

Student Learning Outcome

  • Select an appropriate experimental design with one or more factors,
  • Select an appropriate model with one or more factors,
  • Evaluate statistical analyses of experimental designs,
  • Assess the model adequacy of any experimental design, and
  • Interpret model results.

Module Learning Outcome

Generate Box-Behnken Design in R


bbd() Function

rdocumentation for bbd


Example Problem

  • Taken from Dean, Voss, and Drajuljic (2016)1

DVD Problem 16.11


Example Problem, Data Table

DVD Table 16.27


Coding Formula

\[ \begin{aligned} x_1&\sim (temp-185)/35\\ x_2&\sim (humidity-50)/50\\ x_3&\sim (pressure-5)/4 \end{aligned} \]

R Chunk for Box-Behnken Design

library(rsm)
bbd11.df <- bbd(3,n0=5,coding=list(x1~(temp-185)/35,x2~(humidity-50)/50,x3~(pressure-5)/4),randomize = FALSE)
y <- c(83,36,98,87,103,153,94,107,51,106,48,108,80,81,77,80,82)
bbd11.df$y <- y
print(bbd11.df)

R Chunk for Box-Behnken Design Output

bbd() output


R Chunk for Fitting Model

bbd11.model1 <- rsm(y~SO(x1,x2,x3),data=bbd11.df)
summary(bbd11.model1)

Model Output, part 1

Coefficients from bbd() Full Model


Model Output, part 2

ANOVA from bbd() Full Model


Model Output, part 3

bbd() Output for Full Model


Model Refinement

  • For this example, we will use \(\alpha=0.1.\)
  • Start with pure quadratic and work back to first order
  • For pure quadratic, x2 and x3 are statistically significant using \(\alpha=0.1\)
  • For two-factor interactions, no factors are statistically significant
  • For first order, x2 is statistically significant
  • Using hierarchy, the model will be FO(x2,x3)+PQ(x2,x3)

Second Model, R Chunk

bbd11.model2 <- rsm(y~FO(x2,x3)+PQ(x2,x3),data=bbd11.df)
summary(bbd11.model2)

Second Model, Output

bbd() for Reduced Model


Partial F- Test

Partial F-test in R



  1. Dean, Voss, and Drajuljic (2017). Design and Analysis of Experiments, 2nd edition. Springer Texts in Statistics.