fdo = facDesign(k=3, replicates = 2) #factorial design
set.seed(123) #seed for random numbers
y = rnorm(nrow(fdo)) #random numbers
response(fdo) = y #set the response
normalPlot(fdo) #create a normal plot
Run the code above in your browser using DataLab