rr: Gage R&R

In Antoine-Masse/KefiR: KefiR Package

Gage R&R

Description

Gage R&R

Usage

rr(Var = c(), optr = c(), app = c(), sigma = 5.15)

Arguments

Var	measures.
optr	identifiers of the three operators.
app	identifiers of the 10 pieces.
sigma	tolerated variations (multiplication factor of the standard deviation).

Value

A list containing the following elements:

repeatability

Variability due to the measuring equipment.

reproducibility

Variability due to operators.

RR

Combined effect of repeatability and reproducibility.

Vp

Part - variability due to the measured parts.

Vt

Total variability.

part_Equipement

Percentage of total variability due to measuring equipment.

part_Operators

Percentage of total variability due to operators.

part_R_R

Percentage of total variability due to the combination of repeatability and reproducibility.

part_Pieces

Percentage of total variability due to the measured parts.

Examples

set.seed(2)
data <- data.frame("Measures"=rep(rnorm(10,20,0.007),9)*abs(rnorm(90,1,0.025)),
"Operator"=rep(c("A","B","C"),30),
"Equipement"=rep(1:10,9))
boxplot(data$Measures~data$Equipement)
rr(data$Measures,data$Operator,data$Equipement)

Antoine-Masse/KefiR documentation built on July 4, 2024, 11:40 a.m.