#create a Gage R&R Design
temp = gageRRDesign(Operators = 3,3,3)
#set the response i.e. Measurements
response(temp) = rnorm(27)
#perform a Gage R&R
gdo = gageRR(temp)
#summary
summary(gdo)
#standard graphics for Gage R&R
plot(gdo)
Run the code above in your browser using DataLab